emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/menu-bar.el


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/menu-bar.el
Date: Sat, 25 May 2002 01:11:14 -0400

Index: emacs/lisp/menu-bar.el
diff -c emacs/lisp/menu-bar.el:1.219 emacs/lisp/menu-bar.el:1.220
*** emacs/lisp/menu-bar.el:1.219        Fri May 24 05:52:21 2002
--- emacs/lisp/menu-bar.el      Sat May 25 01:11:13 2002
***************
*** 679,685 ****
  (defun menu-bar-showhide-fringe-menu-customize-left ()
    "Make fringes appear only on the left."
    (interactive)
!   (customize-set-variable 'fringe-mode nil '(nil . 0)))
  
  (define-key menu-bar-showhide-fringe-menu [left]
    '(menu-item "On the Left" menu-bar-showhide-fringe-menu-customize-left
--- 679,686 ----
  (defun menu-bar-showhide-fringe-menu-customize-left ()
    "Make fringes appear only on the left."
    (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
***************
*** 690,696 ****
  (defun menu-bar-showhide-fringe-menu-customize-right ()
    "Make fringes appear only on the right."
    (interactive)
!   (customize-set-variable 'fringe-mode nil '(0 . nil)))
  
  (define-key menu-bar-showhide-fringe-menu [right]
    '(menu-item "On the Right" menu-bar-showhide-fringe-menu-customize-right
--- 691,698 ----
  (defun menu-bar-showhide-fringe-menu-customize-right ()
    "Make fringes appear only on the right."
    (interactive)
!   (require 'fringe)
!   (customize-set-variable 'fringe-mode '(0 . nil)))
  
  (define-key menu-bar-showhide-fringe-menu [right]
    '(menu-item "On the Right" menu-bar-showhide-fringe-menu-customize-right
***************
*** 701,707 ****
  (defun menu-bar-showhide-fringe-menu-customize-disable ()
    "Make fringes disappear."
    (interactive)
!   (customize-set-variable 'fringe-mode nil 0))
  
  (define-key menu-bar-showhide-fringe-menu [none]
    '(menu-item "None" menu-bar-showhide-fringe-menu-customize-disable
--- 703,710 ----
  (defun menu-bar-showhide-fringe-menu-customize-disable ()
    "Make fringes disappear."
    (interactive)
!   (require 'fringe)
!   (customize-set-variable 'fringe-mode 0))
  
  (define-key menu-bar-showhide-fringe-menu [none]
    '(menu-item "None" menu-bar-showhide-fringe-menu-customize-disable



reply via email to

[Prev in Thread] Current Thread [Next in Thread]