Check for required properties.

Signed-off-by: Sébastien Gross <seb•ɑƬ•chezwam•ɖɵʈ•org>
This commit is contained in:
Sébastien Gross 2013-01-29 15:09:31 +01:00
parent ac83d8fe4c
commit 27f8973cf9

View File

@ -309,6 +309,14 @@ object or a file path."
(insert "* WARNING: Are you sure you need features?
If this library has `;;;###autoload' comment (a.k.a autoload cookie),
you don't need `:features'.\n")))
;; Check for required properties.
(loop for key in '(:description :name)
unless (plist-get recipe key)
do (progn
(insert (format
"* Required property %S is not defined.\n"
key))
(incf numerror)))
(insert (format "%s error(s) found." numerror)))
numerror))