diff options
| -rw-r--r-- | lisp/cus-edit.el | 9 |
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*")))) |