diff options
| -rw-r--r-- | generic/proof-utils.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/proof-utils.el b/generic/proof-utils.el index 0b73803b..d5ae9547 100644 --- a/generic/proof-utils.el +++ b/generic/proof-utils.el @@ -543,6 +543,9 @@ It was constructed with `proof-defintset-fn'.") (format "Value for %s (int, currently %s): " (symbol-name (quote ,var)) (symbol-value (quote ,var)))))) + (unless (integerp arg) + ;; type-check to avoid customize type mismatch + (error "Value should be an integer!")) (customize-set-variable (quote ,var) arg)))) (defmacro proof-defintset (var &optional othername) |
