diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-04-05 20:00:23 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-04-05 20:00:23 +0000 |
| commit | 64981d1aab87d61463612ab258f0655b9cb32c79 (patch) | |
| tree | a8e4e3cb15414efb877441c0800bd380d3ae2351 /lisp/subr.el | |
| parent | 06bfc9822af39c7a7720bc7349d52c7a45fc0909 (diff) | |
| download | emacs-64981d1aab87d61463612ab258f0655b9cb32c79.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/subr.el')
| -rw-r--r-- | lisp/subr.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 9166d22b602..a8fcfb67bb4 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -566,7 +566,7 @@ Don't call this function; it is for internal use only." (keymap-prompt map))) (dolist (binding ranges) ;; Treat char-ranges specially. - (define-key map (car binding) (cdr binding))) + (define-key map (vector (car binding)) (cdr binding))) (dolist (binding (prog1 bindings (setq bindings ()))) (let* ((key (car binding)) (item (cdr binding)) |