Mercurial > emacs
changeset 9998:a119e2a45c5f
Undefine kill-region and copy-region-as-kill.
author | Edward M. Reingold <reingold@emr.cs.iit.edu> |
---|---|
date | Thu, 17 Nov 1994 21:49:00 +0000 |
parents | 9108e45601ba |
children | 8187800943e7 |
files | lisp/calendar/calendar.el |
diffstat | 1 files changed, 2 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/calendar.el Thu Nov 17 20:12:13 1994 +0000 +++ b/lisp/calendar/calendar.el Thu Nov 17 21:49:00 1994 +0000 @@ -1387,13 +1387,10 @@ (if window-system (require 'cal-menu)) (calendar-for-loop i from 0 to 9 do (define-key calendar-mode-map (int-to-string i) 'digit-argument)) - ;; kill-region and copy-region-as-kill are omitted from this list - ;; because they cause an ugly second pane in the Edit menu. (let ((l (list 'narrow-to-region 'mark-word 'mark-sexp 'mark-paragraph 'mark-defun 'mark-whole-buffer 'mark-page - 'downcase-region 'upcase-region - 'capitalize-region 'write-region))) - + 'downcase-region 'upcase-region 'kill-region + 'copy-region-as-kill 'capitalize-region 'write-region))) (while l (substitute-key-definition (car l) 'calendar-not-implemented calendar-mode-map global-map)