From: Richard M. Stallman Date: Sat, 20 Jul 2002 22:09:46 +0000 (+0000) Subject: (display-warning, warn, lwarn): Add autoload cookie. X-Git-Tag: ttn-vms-21-2-B4~13952 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=21ece56347cf301fe322d022498e08381205ae54;p=emacs.git (display-warning, warn, lwarn): Add autoload cookie. --- diff --git a/lisp/warnings.el b/lisp/warnings.el index b03ed3f496a..d5f24f0083c 100644 --- a/lisp/warnings.el +++ b/lisp/warnings.el @@ -162,6 +162,7 @@ SUPPRESS-LIST is the list of kinds of warnings to suppress." ;; we return t. some-match)) +;;;###autoload (defun display-warning (group message &optional level buffer-name) "Display a warning message, MESSAGE. GROUP should be a custom group name (a symbol). @@ -236,6 +237,7 @@ See also `warning-series', `warning-prefix-function' and (set-window-start window warning-series)) (sit-for 0))))))) +;;;###autoload (defun lwarn (group level message &rest args) "Display a warning message made from (format MESSAGE ARGS...). Aside from generating the message with `format', @@ -253,6 +255,7 @@ LEVEL should be either :warning, :error, or :emergency. :warning -- suspicious data or circumstances." (display-warning group (apply 'format message args) level)) +;;;###autoload (defun warn (message &rest args) "Display a warning message made from (format MESSAGE ARGS...). Aside from generating the message with `format',