summaryrefslogtreecommitdiff
path: root/admin/cus-test.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-12-28 00:33:44 -0800
committerGlenn Morris <rgm@gnu.org>2013-12-28 00:33:44 -0800
commitc62a19610996165c2d628154561f25e89ff05524 (patch)
tree49bd86e8a69cd794aa639461df7ce0d7b0432ff0 /admin/cus-test.el
parent946618bae3f84472c45d893e20e19b7422346370 (diff)
downloademacs-c62a19610996165c2d628154561f25e89ff05524.tar.gz
* admin/admin.el (cusver-scan): Warn about missing :types.
(cusver-check): Interactively, require existing directories. * admin/cus-test.el: Comment.
Diffstat (limited to 'admin/cus-test.el')
-rw-r--r--admin/cus-test.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/admin/cus-test.el b/admin/cus-test.el
index 54d26cc11d6..818bbe1bc38 100644
--- a/admin/cus-test.el
+++ b/admin/cus-test.el
@@ -187,6 +187,9 @@ The detected problematic options are stored in `cus-test-errors'."
(message "Cus Test running...%s %s"
(length cus-test-tested-variables) symbol)
(condition-case alpha
+ ;; FIXME This defaults to 'sexp if no type was specified.
+ ;; Always report such instances as a type mismatch.
+ ;; Currently abusing cusver-scan to do that.
(let* ((type (custom-variable-type symbol))
(conv (widget-convert type))
(get (or (get symbol 'custom-get) 'default-value))