Commit 896546cd authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

Add provide call.

parent 43c89a96
......@@ -625,4 +625,6 @@ found."
(princ ")")
(print-help-return-message)))
(provide 'apropos)
;;; apropos.el ends here
......@@ -253,4 +253,6 @@ or if CONDITION had no actions, after all other CONDITIONs."
(setq auto-insert-alist (cons (cons key action)
auto-insert-alist))))))
(provide 'autoinsert)
;;; autoinsert.el ends here
......@@ -41,4 +41,6 @@
nil nil nil "-o" (expand-file-name filename))
(message "ncgen in progress...done"))
(provide 'cdl)
;;; cdl.el ends here.
......@@ -262,4 +262,6 @@ Returns to Electric Buffer Menu when done."
(message "Buffer %s does not exist!" bufnam)
(sit-for 4))))
(provide 'ebuff-menu)
;;; ebuff-menu.el ends here
......@@ -147,4 +147,6 @@ The Command History listing is recomputed each time this mode is invoked."
(progn (message "")
(throw 'electric-history-quit nil))))
(provide 'echistory)
;;; echistory.el ends here
......@@ -143,4 +143,6 @@ copyright, if any, are updated as well."
(message "Copyright extends beyond `copyright-limit' and won't be updated automatically."))
comment-end)
(provide 'copyright)
;; copyright.el ends here
......@@ -504,4 +504,6 @@ If argument is nil or an empty string, cancel for all functions."
(set-buffer standard-output)
(help-mode))))
(provide 'debug)
;;; debug.el ends here
......@@ -263,4 +263,6 @@ OBJ should be a call to BYTE-CODE generated by the byte compiler."
(insert "\n")))))
nil)
(provide 'disass)
;;; disass.el ends here
......@@ -285,4 +285,6 @@ an existing event object."
GNU Emacs 19 does not currently generate process-output events."
(eq (car-safe obj) 'process))
(provide 'levents)
;;; levents.el ends here
......@@ -227,4 +227,6 @@ the kill ring or the Clipboard."
(push-mark)
(insert clip)))
(provide 'lselect)
;;; lselect.el ends here.
......@@ -322,4 +322,6 @@ DEF is (symbol-function FUN)."
(interactive)
(process-send-string profile-timer-process "q\n"))
(provide 'profile)
;;; profile.el ends here
......@@ -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
......@@ -1483,4 +1483,6 @@ With ARG, inserts that many newlines."
(if flag (forward-char 1))))) arg)
t))
(provide 'vi)
;;; vi.el ends here
......@@ -3042,4 +3042,6 @@ vip-s-string"
(if (file-exists-p vip-startup-file) (load vip-startup-file))
(provide 'vip)
;;; vip.el ends here
......@@ -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
......@@ -149,4 +149,6 @@
(setq ptr (cdr ptr))))
)
(provide 'find-gc)
;;; find-gc.el ends here
......@@ -103,7 +103,7 @@ This variable is buffer-local.")
(defvar ielm-header
(concat
"*** Welcome to IELM version "
(substring "$Revision: 1.12 $" 11 -2)
(substring "$Revision: 1.13 $" 11 -2)
" *** Type (describe-mode) for help.\n"
"IELM has ABSOLUTELY NO WARRANTY; type (describe-no-warranty) for details.\n")
"Message to display when IELM is started.")
......@@ -490,4 +490,6 @@ Switches to the buffer `*ielm*', or creates it if it does not exist."
(inferior-emacs-lisp-mode)))
(pop-to-buffer "*ielm*"))
(provide 'ielm)
;;; ielm.el ends here
......@@ -427,4 +427,6 @@ For example, invoke \"emacs -batch -f batch-info-validate $info/ ~/*.info\""
(error (message ">> Error: %s" (prin1-to-string err))))))
(kill-emacs error))))
(provide 'informat)
;;; informat.el ends here
......@@ -147,4 +147,6 @@ command `kermit | tr -d '\\015''."
(interactive)
(set-process-filter (get-buffer-process (current-buffer)) nil))
(provide 'kermit)
;;; kermit.el ends here
......@@ -152,4 +152,6 @@ do (setq lisp-mode-hook 'ledit-from-lisp-mode)"
(setq major-mode 'ledit-mode)
(run-hooks 'ledit-mode-hook))
(provide 'ledit)
;;; ledit.el ends here
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment