summaryrefslogtreecommitdiff
path: root/lisp/cus-edit.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2006-06-23 13:17:44 +0000
committerEli Zaretskii <eliz@gnu.org>2006-06-23 13:17:44 +0000
commit81711dbab8efbf1fbf15a711605aae6b55e9a861 (patch)
tree85291b77c140c2be4da676ea11451a4dfd400557 /lisp/cus-edit.el
parent08fd202a3d870cfbafa1dcddf189b5a0d1d63fa7 (diff)
downloademacs-81711dbab8efbf1fbf15a711605aae6b55e9a861.tar.gz
(customize-apropos): A better error message.
(top level) <debug-ignored-errors>: Extend and update the list of ignored error messages.
Diffstat (limited to 'lisp/cus-edit.el')
-rw-r--r--lisp/cus-edit.el23
1 files changed, 16 insertions, 7 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 53f92f2243b..d7ffab4bc5b 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -1366,10 +1366,10 @@ that are not customizable options, as well as faces and groups
(get symbol 'variable-documentation))))
(push (list symbol 'custom-variable) found)))))
(if (not found)
- (error "No matches")
- (custom-buffer-create (custom-sort-items found t
- custom-buffer-order-groups)
- "*Customize Apropos*"))))
+ (error "No customizable items matching %s" regexp)
+ (custom-buffer-create
+ (custom-sort-items found t custom-buffer-order-groups)
+ "*Customize Apropos*"))))
;;;###autoload
(defun customize-apropos-options (regexp &optional arg)
@@ -4520,9 +4520,18 @@ if that value is non-nil."
(put 'custom-mode 'mode-class 'special)
-(add-to-list
- 'debug-ignored-errors
- "^No user options have changed defaults in recent Emacs versions$")
+(dolist (regexp
+ '("^No user option defaults have been changed since Emacs "
+ "^Invalid face:? "
+ "^No \\(?:customized\\|rogue\\|saved\\) user options"
+ "^No customizable items matching "
+ "^There are unset changes"
+ "^Cannot set hidden variable"
+ "^No \\(?:saved\\|backup\\) value for "
+ "^No standard setting known for "
+ "^No standard setting for this face"
+ "^Saving settings from \"emacs -q\" would overwrite existing customizations"))
+ (add-to-list 'debug-ignored-errors regexp))
;;; The End.