comparison lisp/calc/calc-ext.el @ 112391:93209af5dc0b

calc/calc-ext.el (calc-init-extensions): Map all `undo' keybindings to `calc-undo'.
author Jay Belanger <jay.p.belanger@gmail.com>
date Thu, 20 Jan 2011 19:04:56 -0600
parents 61f7601898b1
children 23a54fb18e67
comparison
equal deleted inserted replaced
112390:1b25cd6a6e36 112391:93209af5dc0b
134 (define-key calc-mode-map "\C-k" 'calc-kill) 134 (define-key calc-mode-map "\C-k" 'calc-kill)
135 (define-key calc-mode-map "\M-k" 'calc-copy-as-kill) 135 (define-key calc-mode-map "\M-k" 'calc-copy-as-kill)
136 (define-key calc-mode-map "\C-w" 'calc-kill-region) 136 (define-key calc-mode-map "\C-w" 'calc-kill-region)
137 (define-key calc-mode-map "\M-w" 'calc-copy-region-as-kill) 137 (define-key calc-mode-map "\M-w" 'calc-copy-region-as-kill)
138 (define-key calc-mode-map "\M-\C-w" 'kill-ring-save) 138 (define-key calc-mode-map "\M-\C-w" 'kill-ring-save)
139 (define-key calc-mode-map "\C-_" 'calc-undo) 139 (define-key calc-mode-map [remap undo] 'calc-undo)
140 (define-key calc-mode-map "\C-xu" 'calc-undo)
141 (define-key calc-mode-map "\M-\C-m" 'calc-last-args) 140 (define-key calc-mode-map "\M-\C-m" 'calc-last-args)
142 141
143 (define-key calc-mode-map "a" nil) 142 (define-key calc-mode-map "a" nil)
144 (define-key calc-mode-map "a?" 'calc-a-prefix-help) 143 (define-key calc-mode-map "a?" 'calc-a-prefix-help)
145 (define-key calc-mode-map "aa" 'calc-apart) 144 (define-key calc-mode-map "aa" 'calc-apart)