diff options
| author | dalanicolai | 2021-10-30 17:32:17 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2021-10-30 17:34:08 +0200 |
| commit | eb07b3d9b3e05b6863fa61ea3b022f2184ec5c82 (patch) | |
| tree | 7720616b6136dad77e46a943b682e64521faeb40 | |
| parent | c23cb2861eab646498d2d7d28a8d46f4de91ebb3 (diff) | |
| download | emacs-eb07b3d9b3e05b6863fa61ea3b022f2184ec5c82.tar.gz emacs-eb07b3d9b3e05b6863fa61ea3b022f2184ec5c82.zip | |
Make list-colors-display sort list passed as argument
* lisp/facemenu.el (list-colors-display): Don't skip sorting list of
colors if it was passed as an argument. (Bug#51371)
| -rw-r--r-- | lisp/facemenu.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/facemenu.el b/lisp/facemenu.el index 7417bb12030..fe458b8c07b 100644 --- a/lisp/facemenu.el +++ b/lisp/facemenu.el | |||
| @@ -551,8 +551,8 @@ If the optional argument CALLBACK is non-nil, it should be a | |||
| 551 | function to call each time the user types RET or clicks on a | 551 | function to call each time the user types RET or clicks on a |
| 552 | color. The function should accept a single argument, the color name." | 552 | color. The function should accept a single argument, the color name." |
| 553 | (interactive) | 553 | (interactive) |
| 554 | (when (and (null list) (> (display-color-cells) 0)) | 554 | (when (> (display-color-cells) 0) |
| 555 | (setq list (list-colors-duplicates (defined-colors))) | 555 | (setq list (list-colors-duplicates (or list (defined-colors)))) |
| 556 | (when list-colors-sort | 556 | (when list-colors-sort |
| 557 | ;; Schwartzian transform with `(color key1 key2 key3 ...)'. | 557 | ;; Schwartzian transform with `(color key1 key2 key3 ...)'. |
| 558 | (setq list (mapcar | 558 | (setq list (mapcar |