* menu-bar.el (menu-bar-showhide-fringe-menu): Moved "On the Right"

so it comes after "On the Left" in the menu.

2 files changed, 17 insertions, 12 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c6e47e65567..cee47ad6a01 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-12-13  Jan Dj,Ad(Brv  <jan.h.d@swipnet.se>
+
+        * menu-bar.el (menu-bar-showhide-fringe-menu): Moved "On the Right"
+        so it comes after "On the Left" in the menu.
+
 2005-12-12  Luc Teirlinck  <teirllm@auburn.edu>
 
         * cus-edit.el (customize-apropos, customize-apropos-options)
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 56745d82cc4..3d226b9258b 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -831,18 +831,6 @@ mail status in mode line"))
               :visible (display-graphic-p)
               :button (:radio . (eq fringe-mode nil))))
 
-(defun menu-bar-showhide-fringe-menu-customize-left ()
-  "Display fringes only on the left of each window."
-  (interactive)
-  (require 'fringe)
-  (customize-set-variable 'fringe-mode '(nil . 0)))
-
-(define-key menu-bar-showhide-fringe-menu [left]
-  '(menu-item "On the Left" menu-bar-showhide-fringe-menu-customize-left
-              :help "Fringe only on the left side"
-              :visible (display-graphic-p)
-              :button (:radio . (equal fringe-mode '(nil . 0)))))
-
 (defun menu-bar-showhide-fringe-menu-customize-right ()
   "Display fringes only on the right of each window."
   (interactive)
@@ -855,6 +843,18 @@ mail status in mode line"))
               :visible (display-graphic-p)
               :button (:radio . (equal fringe-mode '(0 . nil)))))
 
+(defun menu-bar-showhide-fringe-menu-customize-left ()
+  "Display fringes only on the left of each window."
+  (interactive)
+  (require 'fringe)
+  (customize-set-variable 'fringe-mode '(nil . 0)))
+
+(define-key menu-bar-showhide-fringe-menu [left]
+  '(menu-item "On the Left" menu-bar-showhide-fringe-menu-customize-left
+              :help "Fringe only on the left side"
+              :visible (display-graphic-p)
+              :button (:radio . (equal fringe-mode '(nil . 0)))))
+
 (defun menu-bar-showhide-fringe-menu-customize-disable ()
   "Do not display window fringes."
   (interactive)