aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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."
526 (cons "Cut" (cons "Delete text in region and copy it to the clipboard" 526 (cons "Cut" (cons "Delete text in region and copy it to the clipboard"
527 'clipboard-kill-region))) 527 'clipboard-kill-region)))
528 528
529 ;; These are Sun server keysyms for the Cut, Copy and Paste keys
530 ;; (also for XFree86 on Sun keyboard):
529 (define-key global-map [f20] 'clipboard-kill-region) 531 (define-key global-map [f20] 'clipboard-kill-region)
530 (define-key global-map [f16] 'clipboard-kill-ring-save) 532 (define-key global-map [f16] 'clipboard-kill-ring-save)
531 (define-key global-map [f18] 'clipboard-yank) 533 (define-key global-map [f18] 'clipboard-yank)
532 ;; X11R6 versions 534 ;; X11R6 versions:
533 (define-key global-map [cut] 'clipboard-kill-region) 535 (define-key global-map [cut] 'clipboard-kill-region)
534 (define-key global-map [copy] 'clipboard-kill-ring-save) 536 (define-key global-map [copy] 'clipboard-kill-ring-save)
535 (define-key global-map [paste] 'clipboard-yank)) 537 (define-key global-map [paste] 'clipboard-yank))
@@ -665,12 +667,12 @@ PROPS are additional properties."
665 667
666(define-key menu-bar-showhide-menu [column-number-mode] 668(define-key menu-bar-showhide-menu [column-number-mode]
667 (menu-bar-make-mm-toggle column-number-mode 669 (menu-bar-make-mm-toggle column-number-mode
668 "Show Column Numbers" 670 "Column Numbers"
669 "Show the current column number in the mode line")) 671 "Show the current column number in the mode line"))
670 672
671(define-key menu-bar-showhide-menu [line-number-mode] 673(define-key menu-bar-showhide-menu [line-number-mode]
672 (menu-bar-make-mm-toggle line-number-mode 674 (menu-bar-make-mm-toggle line-number-mode
673 "Show Line Numbers" 675 "Line Numbers"
674 "Show the current line number in the mode line")) 676 "Show the current line number in the mode line"))
675 677
676(define-key menu-bar-showhide-menu [linecolumn-separator] 678(define-key menu-bar-showhide-menu [linecolumn-separator]
@@ -685,8 +687,8 @@ PROPS are additional properties."
685 (customize-mark-as-set 'display-time-mode)) 687 (customize-mark-as-set 'display-time-mode))
686 688
687(define-key menu-bar-showhide-menu [showhide-date-time] 689(define-key menu-bar-showhide-menu [showhide-date-time]
688 '(menu-item "Date and Time" showhide-date-time 690 '(menu-item "Date, Time and Mail" showhide-date-time
689 :help "Display date and time in the mode line" 691 :help "Display date, time, mail status in mode line"
690 :button (:toggle . display-time-mode))) 692 :button (:toggle . display-time-mode)))
691 693
692(define-key menu-bar-showhide-menu [datetime-separator] 694(define-key menu-bar-showhide-menu [datetime-separator]