mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(menu-bar-apropos-menu): Moved all `apropos' bindings here.

Browse Source 
(menu-bar-help-menu): Added `menu-bar-apropos-menu'.
This commit is contained in:
Sam Steingold 2001-11-25 05:46:35 +00:00
parent c85ee897fa
commit df5bde6d9a
2 changed files with 41 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lisp/ChangeLog
View File

@ -1,3 +1,9 @@
2001-11-25 Sam Steingold <sds@gnu.org>
* menu-bar.el (menu-bar-apropos-menu): New variable.
Moved all `apropos' bindings to this menu.
(menu-bar-help-menu): Added `menu-bar-apropos-menu'.
2001-11-24 KAWABATA, Taichi <batta@beige.ocn.ne.jp>
The following changes are for new indian languages support based
@ -11,10 +17,10 @@
* international/fontset.el: Delete the setting for indian-1-column
and add the setting for indian-glyph in the default fontset.
* language/indian.el: Completely re-written.
* language/devanagari.el: Completely re-written.
* language/devanagari.el: Completely re-written.
* language/devan-util.el: Completely re-written.
@ -49,7 +55,7 @@
2001-11-23 Colin Walters <walters@debian.org>
* Makefile.in (finder_setwins, setwins): Include Calc again.
* calc/calc-rules.el: Add header comment.
2001-11-23 Andre Spiegel <spiegel@gnu.org>
@ -65,7 +71,7 @@
2001-11-22 Colin Walters <walters@debian.org>
* calc/calc-misc.el (report-calc-bug):
* calc/calc-misc.el (report-calc-bug):
Use `reporter-prompt-for-summary-p'.
* calc/INSTALL, calc/Makefile: Remove.

40
lisp/menu-bar.el
View File

@ -809,6 +809,10 @@ Do the same for the keys of the same name."
'(menu-item "Show All of Mule Status" mule-diag
:visible default-enable-multibyte-characters
:help "Display multilingual environment settings"))
(define-key menu-bar-describe-menu [describe-coding-system-briefly]
'(menu-item "Describe Coding System (Briefly)..."
describe-current-coding-system-briefly
:visible default-enable-multibyte-characters))
(define-key menu-bar-describe-menu [describe-coding-system]
'(menu-item "Describe Coding System..." describe-coding-system
:visible default-enable-multibyte-characters))
@ -827,9 +831,12 @@ Do the same for the keys of the same name."
(define-key menu-bar-describe-menu [list-keybindings]
'(menu-item "List Key Bindings" describe-bindings
:help "Display a list of all current keybindings"))
(define-key menu-bar-describe-menu [list-keybindings]
'(menu-item "List Key Bindings" describe-bindings
:help "Display a list of all current keybindings"))
(define-key menu-bar-describe-menu [describe-current-display-table]
'(menu-item "Describe Display Table" describe-current-display-table
:help "Describe the current display table"))
(define-key menu-bar-describe-menu [describe-face]
'(menu-item "Describe Face..." describe-face
:help "Display the properties of a face"))
(define-key menu-bar-describe-menu [describe-variable]
'(menu-item "Describe Variable..." describe-variable
:help "Display documentation of variable/option"))
@ -841,16 +848,28 @@ Do the same for the keys of the same name."
;; Users typically don't identify keys and menu items...
:help "Display documentation of command bound to a \
key (or menu-item)"))
(define-key menu-bar-describe-menu [apropos-variables]
'(menu-item "Apropos Variables..." apropos-variable
:help "List variables whose names match a regexp"))
(define-key menu-bar-describe-menu [apropos-commands]
'(menu-item "Apropos Commands..." apropos-command
:help "List commands whose names match a regexp"))
(define-key menu-bar-describe-menu [describe-mode]
'(menu-item "Describe Buffer Modes" describe-mode
:help "Describe this buffer's major and minor mode"))
(defvar menu-bar-apropos-menu (make-sparse-keymap "Apropos"))
(define-key menu-bar-apropos-menu [apropos-documentation]
'(menu-item "Apropos Documentation..." apropos-documentation
:help "List variables whose doc strings match a regexp"))
(define-key menu-bar-apropos-menu [apropos]
'(menu-item "Apropos Symbol..." apropos
:help "List symbols whose names match a regexp"))
(define-key menu-bar-apropos-menu [apropos-value]
'(menu-item "Apropos Value..." apropos-value
:help "List variables whose values match a regexp"))
(define-key menu-bar-apropos-menu [apropos-variables]
'(menu-item "Apropos Variables..." apropos-variable
:help "List variables whose names match a regexp"))
(define-key menu-bar-apropos-menu [apropos-commands]
'(menu-item "Apropos Commands..." apropos-command
:help "List commands whose names match a regexp"))
(defvar menu-bar-manuals-menu (make-sparse-keymap "Manuals"))
(define-key menu-bar-manuals-menu [man]
@ -898,6 +917,9 @@ key (or menu-item)"))
(define-key menu-bar-help-menu [finder-by-keyword]
'(menu-item "Find Emacs Packages..." finder-by-keyword
:help "Find packages and features by keyword"))
(define-key menu-bar-help-menu [apropos]
(list 'menu-item "Apropos" menu-bar-apropos-menu
:help "Find commands, variables, keys"))
(define-key menu-bar-help-menu [describe]
(list 'menu-item "Describe" menu-bar-describe-menu
:help "Describe commands, variables, keys"))