aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2007-08-03 03:21:49 +0000
committerGlenn Morris2007-08-03 03:21:49 +0000
commitda435d1cf2b1a368bdd266eecbb8c632f656d614 (patch)
tree28aeadaff8432be96dadeb64a150046017a698ac
parent3b7a686f5450b7ebda37082050064fb8c5726ec0 (diff)
downloademacs-da435d1cf2b1a368bdd266eecbb8c632f656d614.tar.gz
emacs-da435d1cf2b1a368bdd266eecbb8c632f656d614.zip
(customize-apropos): Make the error message indicate what kind of
thing the user was trying to customize.
-rw-r--r--lisp/cus-edit.el9
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 78b402c9c0a..2cfd247a645 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -1376,7 +1376,14 @@ that are not customizable options, as well as faces and groups
1376 (get symbol 'variable-documentation)))) 1376 (get symbol 'variable-documentation))))
1377 (push (list symbol 'custom-variable) found))))) 1377 (push (list symbol 'custom-variable) found)))))
1378 (if (not found) 1378 (if (not found)
1379 (error "No customizable items matching %s" regexp) 1379 (error "No %s matching %s"
1380 (if (eq all t)
1381 "items"
1382 (format "customizable %s"
1383 (if (memq all '(options faces groups))
1384 (symbol-name all)
1385 "items")))
1386 regexp)
1380 (custom-buffer-create 1387 (custom-buffer-create
1381 (custom-sort-items found t custom-buffer-order-groups) 1388 (custom-sort-items found t custom-buffer-order-groups)
1382 "*Customize Apropos*")))) 1389 "*Customize Apropos*"))))