From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 17 Sep 1994 03:32:48 +0000 (+0000)
Subject: (facemenu-update): Reverse the menu order again.
X-Git-Tag: emacs-19.34~7004
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b22e89dc98cb0837863769de12026c61c894cddb;p=emacs.git

(facemenu-update): Reverse the menu order again.
---

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