summaryrefslogtreecommitdiff
path: root/lisp/menu-bar.el
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2003-09-01 18:48:10 +0000
committerDave Love <fx@gnu.org>2003-09-01 18:48:10 +0000
commite3fa3057d79ba4bfaa4b9790395c650186ec7d5b (patch)
treee1c256d825133d4548637900d246f7a1aa81cfa1 /lisp/menu-bar.el
parenta7df580dc88d32c0824344f62d86757f1cb7dda5 (diff)
downloademacs-e3fa3057d79ba4bfaa4b9790395c650186ec7d5b.tar.gz
(menu-bar-showhide-menu): Amend date and time label
and :help; also line and column numbers labels.
Diffstat (limited to 'lisp/menu-bar.el')
-rw-r--r--lisp/menu-bar.el12
1 files changed, 7 insertions, 5 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index a42e3be62dc..7db5f96e6d7 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -526,10 +526,12 @@ Do the same for the keys of the same name."
(cons "Cut" (cons "Delete text in region and copy it to the clipboard"
'clipboard-kill-region)))
+ ;; These are Sun server keysyms for the Cut, Copy and Paste keys
+ ;; (also for XFree86 on Sun keyboard):
(define-key global-map [f20] 'clipboard-kill-region)
(define-key global-map [f16] 'clipboard-kill-ring-save)
(define-key global-map [f18] 'clipboard-yank)
- ;; X11R6 versions
+ ;; X11R6 versions:
(define-key global-map [cut] 'clipboard-kill-region)
(define-key global-map [copy] 'clipboard-kill-ring-save)
(define-key global-map [paste] 'clipboard-yank))
@@ -665,12 +667,12 @@ PROPS are additional properties."
(define-key menu-bar-showhide-menu [column-number-mode]
(menu-bar-make-mm-toggle column-number-mode
- "Show Column Numbers"
+ "Column Numbers"
"Show the current column number in the mode line"))
(define-key menu-bar-showhide-menu [line-number-mode]
(menu-bar-make-mm-toggle line-number-mode
- "Show Line Numbers"
+ "Line Numbers"
"Show the current line number in the mode line"))
(define-key menu-bar-showhide-menu [linecolumn-separator]
@@ -685,8 +687,8 @@ PROPS are additional properties."
(customize-mark-as-set 'display-time-mode))
(define-key menu-bar-showhide-menu [showhide-date-time]
- '(menu-item "Date and Time" showhide-date-time
- :help "Display date and time in the mode line"
+ '(menu-item "Date, Time and Mail" showhide-date-time
+ :help "Display date, time, mail status in mode line"
:button (:toggle . display-time-mode)))
(define-key menu-bar-showhide-menu [datetime-separator]