mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Undefine kill-region and copy-region-as-kill.

Browse source
This commit is contained in:
Edward M. Reingold 1994-11-17 21:49:00 +00:00
parent 051d1419cd
commit 8f12817f58
1 changed files with 2 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/calendar/calendar.el
View file

@ -1387,13 +1387,10 @@ the inserted text. Value is always t."
(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)