emacs-devel
[Top][All Lists]
Advanced

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

RE: customize-saved in the customize menu?


From: Simon Marshall
Subject: RE: customize-saved in the customize menu?
Date: Mon, 29 Apr 2002 09:42:04 -0400

OK, there wasn't any more feedback, so here's a possible patch...  I
played around a little with the layout.  I think the best layout is to
have a separate menu section for the Saved... and New... menu entries,
since both create a customise buffer for a selection of disparate
options.

cd ~/ftp/emacs-21.1.90/lisp/
diff -c /rvcarma/marshals/ftp/emacs-21.1.90/lisp/menu-bar.el.\~1\~ 
/rvcarma/marshals/ftp/emacs-21.1.90/lisp/menu-bar.el
*** /rvcarma/marshals/ftp/emacs-21.1.90/lisp/menu-bar.el.~1~    Thu Nov 15 
20:29:44 2001
--- /rvcarma/marshals/ftp/emacs-21.1.90/lisp/menu-bar.el        Mon Apr 29 
14:25:56 2002
***************
*** 498,504 ****
  (define-key menu-bar-custom-menu [customize-apropos]
    '(menu-item "Settings Matching Regexp..." customize-apropos
              :help "Browse customizable settings whose names match regexp"))
! (define-key menu-bar-custom-menu [separator-2]
    '("--"))
  (define-key menu-bar-custom-menu [customize-group]
    '(menu-item "Specific Group..." customize-group
--- 498,504 ----
  (define-key menu-bar-custom-menu [customize-apropos]
    '(menu-item "Settings Matching Regexp..." customize-apropos
              :help "Browse customizable settings whose names match regexp"))
! (define-key menu-bar-custom-menu [separator-1]
    '("--"))
  (define-key menu-bar-custom-menu [customize-group]
    '(menu-item "Specific Group..." customize-group
***************
*** 508,517 ****
              :help "Customize attributes of specific face"))
  (define-key menu-bar-custom-menu [customize-option]
    '(menu-item "Specific Option..." customize-option
!             :help "Change value of specific option"))
  (define-key menu-bar-custom-menu [customize-changed-options]
!   '(menu-item "Recently Changed Options..." customize-changed-options
!             :help "Customize options changed in recent versions"))
  (define-key menu-bar-custom-menu [separator-3]
    '("--"))
  (define-key menu-bar-custom-menu [customize-browse]
--- 508,522 ----
              :help "Customize attributes of specific face"))
  (define-key menu-bar-custom-menu [customize-option]
    '(menu-item "Specific Option..." customize-option
!             :help "Customize value of specific option"))
! (define-key menu-bar-custom-menu [separator-2]
!   '("--"))
  (define-key menu-bar-custom-menu [customize-changed-options]
!   '(menu-item "New Options..." customize-changed-options
!             :help "Options added or changed in recent Emacs versions"))
! (define-key menu-bar-custom-menu [customize-saved]
!   '(menu-item "Saved Options" customize-saved
!             :help "Customize previously saved options"))
  (define-key menu-bar-custom-menu [separator-3]
    '("--"))
  (define-key menu-bar-custom-menu [customize-browse]

Diff finished at Mon Apr 29 14:35:23



reply via email to

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