(defgroup warnings): New group.

This commit is contained in:
Markus Rost 2002-11-17 22:24:42 +00:00
parent 000d99237f
commit d283d229dc

View file

@ -29,6 +29,11 @@
;;; Code:
(defgroup warnings nil
"Log and display warnings."
:version "21.4"
:group 'lisp)
(defvar warning-levels
'((:emergency "Emergency%s: " ding)
(:error "Error%s: ")