summaryrefslogtreecommitdiff
path: root/lisp/facemenu.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-09-17 03:32:48 +0000
committerRichard M. Stallman <rms@gnu.org>1994-09-17 03:32:48 +0000
commit4564ee296ddc5131a5c81a7fb5eb924b7b8e2c51 (patch)
tree9c1af2577007c2ff0bf04988912ac979e10d220a /lisp/facemenu.el
parent3b95264d8c80ae552c376479be9a7b1812e035fa (diff)
downloademacs-4564ee296ddc5131a5c81a7fb5eb924b7b8e2c51.tar.gz
(facemenu-update): Reverse the menu order again.
Diffstat (limited to 'lisp/facemenu.el')
-rw-r--r--lisp/facemenu.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index f01b493f6d7..6688e92a583 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -133,17 +133,17 @@ changing it.")
;; Define basic keys
;; We construct this list structure explicitly because a quoted constant
;; would be pure.
- (define-key facemenu-menu [other] (cons "Other..." 'facemenu-set-face))
- (define-key facemenu-menu [sep2] (list "---Special---"))
- (define-key facemenu-menu [invisible] (cons "Invisible"
- 'facemenu-set-invisible))
- (define-key facemenu-menu [read-only] (cons "Read-Only"
- 'facemenu-set-read-only))
+ (define-key facemenu-menu [update] (cons "Update Menu" 'facemenu-update))
+ (define-key facemenu-menu [display] (cons "Display" 'list-faces-display))
+ (define-key facemenu-menu [sep1] (list "-------------"))
(define-key facemenu-menu [remove] (cons "Remove Properties"
'facemenu-remove-all))
- (define-key facemenu-menu [sep1] (list "-------------"))
- (define-key facemenu-menu [display] (cons "Display" 'list-faces-display))
- (define-key facemenu-menu [update] (cons "Update Menu" 'facemenu-update))
+ (define-key facemenu-menu [read-only] (cons "Read-Only"
+ 'facemenu-set-read-only))
+ (define-key facemenu-menu [invisible] (cons "Invisible"
+ 'facemenu-set-invisible))
+ (define-key facemenu-menu [sep2] (list "---Special---"))
+ (define-key facemenu-menu [other] (cons "Other..." 'facemenu-set-face))
;; Define commands for face-changing
(facemenu-iterate