diff options
| author | Jay Belanger | 2010-04-17 22:09:18 -0500 |
|---|---|---|
| committer | Jay Belanger | 2010-04-17 22:09:18 -0500 |
| commit | a0d3397536d7507875fd3d5e2a8bb4b840c49013 (patch) | |
| tree | edaec9d34325965b55ddf1ddcfbd94575ed8cafe | |
| parent | 7aad87e884d84e136b57daee0506d85327be59df (diff) | |
| download | emacs-a0d3397536d7507875fd3d5e2a8bb4b840c49013.tar.gz emacs-a0d3397536d7507875fd3d5e2a8bb4b840c49013.zip | |
calc.el (calc-mode-map): Bind O to 'calc-missing-key'.
| -rw-r--r-- | lisp/calc/calc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index c5a5458fff8..07fa4414dda 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el | |||
| @@ -1041,7 +1041,7 @@ Used by `calc-user-invocation'.") | |||
| 1041 | (mapc (lambda (x) (define-key map (char-to-string x) 'undefined)) | 1041 | (mapc (lambda (x) (define-key map (char-to-string x) 'undefined)) |
| 1042 | "lOW") | 1042 | "lOW") |
| 1043 | (mapc (lambda (x) (define-key map (char-to-string x) 'calc-missing-key)) | 1043 | (mapc (lambda (x) (define-key map (char-to-string x) 'calc-missing-key)) |
| 1044 | (concat "ABCDEFGHIJKLMNPQRSTUVXZabcdfghjkmoprstuvwxyz" | 1044 | (concat "ABCDEFGHIJKLMNOPQRSTUVXZabcdfghjkmoprstuvwxyz" |
| 1045 | ":\\|!()[]<>{},;=~`\C-k\C-w\C-_")) | 1045 | ":\\|!()[]<>{},;=~`\C-k\C-w\C-_")) |
| 1046 | (define-key map "\M-w" 'calc-missing-key) | 1046 | (define-key map "\M-w" 'calc-missing-key) |
| 1047 | (define-key map "\M-k" 'calc-missing-key) | 1047 | (define-key map "\M-k" 'calc-missing-key) |