Mercurial > emacs
changeset 93474:b3b75d97d96a
Autoload `calc-yank'.
(calc-mode-map): Add keybindings for `calc-yank'.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Tue, 01 Apr 2008 02:06:44 +0000 |
| parents | 33248fa26b8c |
| children | b4a18ad26515 |
| files | lisp/calc/calc.el |
| diffstat | 1 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc.el Tue Apr 01 00:54:03 2008 +0000 +++ b/lisp/calc/calc.el Tue Apr 01 02:06:44 2008 +0000 @@ -1031,6 +1031,8 @@ (define-key map "\C-m" 'calc-enter) (define-key map "\M-\C-m" 'calc-last-args-stub) (define-key map "\C-j" 'calc-over) + (define-key map "\C-y" 'calc-yank) + (define-key map [mouse-2] 'calc-yank) (mapc (lambda (x) (define-key map (char-to-string x) 'undefined)) "lOW") @@ -1182,7 +1184,9 @@ calc-missing-key calc-mod calc-other-window calc-over calc-percent calc-pop-above calc-power calc-roll-down calc-roll-up calc-shift-Y-prefix-help calc-tutorial calcDigit-letter - report-calc-bug))) + report-calc-bug) + + ("calc-yank" calc-yank))) ;;;###autoload (define-key ctl-x-map "*" 'calc-dispatch)