249 |
(defun lwarn (group level message &rest args) |
(defun lwarn (group level message &rest args) |
250 |
"Display a warning message made from (format MESSAGE ARGS...). |
"Display a warning message made from (format MESSAGE ARGS...). |
251 |
Aside from generating the message with `format', |
Aside from generating the message with `format', |
252 |
this is equivalent to `display-message'. |
this is equivalent to `display-warning'. |
253 |
|
|
254 |
GROUP should be a custom group name (a symbol). |
GROUP should be a custom group name (a symbol). |
255 |
or else a list of symbols whose first element is a custom group name. |
or else a list of symbols whose first element is a custom group name. |
267 |
(defun warn (message &rest args) |
(defun warn (message &rest args) |
268 |
"Display a warning message made from (format MESSAGE ARGS...). |
"Display a warning message made from (format MESSAGE ARGS...). |
269 |
Aside from generating the message with `format', |
Aside from generating the message with `format', |
270 |
this is equivalent to `display-message', using |
this is equivalent to `display-warning', using |
271 |
`emacs' as the group and `:warning' as the level." |
`emacs' as the group and `:warning' as the level." |
272 |
(display-warning 'emacs (apply 'format message args))) |
(display-warning 'emacs (apply 'format message args))) |
273 |
|
|