Add provide call.

4 files changed, 8 insertions, 0 deletions

diff --git a/lisp/emulation/pc-mode.el b/lisp/emulation/pc-mode.el
index c7db52ba567..e10d97be3d7 100644
--- a/lisp/emulation/pc-mode.el
+++ b/lisp/emulation/pc-mode.el
@@ -49,4 +49,6 @@ C-Escape does list-buffers."
   (global-set-key [C-home] 'beginning-of-buffer)
   (global-set-key [C-end] 'end-of-buffer))
 
+(provide 'pc-mode)
+
 ;; pc-mode.el ends here
diff --git a/lisp/emulation/vi.el b/lisp/emulation/vi.el
index 7c14ca9ce22..dbc4ade3ef0 100644
--- a/lisp/emulation/vi.el
+++ b/lisp/emulation/vi.el
@@ -1483,4 +1483,6 @@ With ARG, inserts that many newlines."
                         (if flag (forward-char 1))))) arg)
     t))
 
+(provide 'vi)
+
 ;;; vi.el ends here
diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el
index a8739f2350b..d32cd95f753 100644
--- a/lisp/emulation/vip.el
+++ b/lisp/emulation/vip.el
@@ -3042,4 +3042,6 @@ vip-s-string"
 
 (if (file-exists-p vip-startup-file) (load vip-startup-file))
 
+(provide 'vip)
+
 ;;; vip.el ends here
diff --git a/lisp/emulation/ws-mode.el b/lisp/emulation/ws-mode.el
index 93bb0a05a62..29158dbf174 100644
--- a/lisp/emulation/ws-mode.el
+++ b/lisp/emulation/ws-mode.el
@@ -752,4 +752,6 @@ sWith: " )
                     (ws-block-end-marker "Block begin marker not set")
                     (t "Block markers not set")))))
 
+(provide 'ws-mode)
+
 ;;; ws-mode.el ends here