Mercurial > emacs
changeset 77198:4588da3832c6
(tmm-get-keybind): Use copy-sequence to ensure that the
global map isn't modified
| author | Nick Roberts <nickrob@snap.net.nz> |
|---|---|
| date | Sat, 14 Apr 2007 12:34:35 +0000 |
| parents | 775d7060a120 |
| children | 1c6131b3845b |
| files | lisp/tmm.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/tmm.el Sat Apr 14 12:33:25 2007 +0000 +++ b/lisp/tmm.el Sat Apr 14 12:34:35 2007 +0000 @@ -541,7 +541,7 @@ ;; Make a list of all the bindings in all the keymaps. (setq minorbind (mapcar 'cdr (minor-mode-key-binding keyseq))) (setq localbind (local-key-binding keyseq)) - (setq globalbind (cdr (global-key-binding keyseq))) + (setq globalbind (copy-sequence (cdr (global-key-binding keyseq)))) ;; If items have been redefined/undefined locally, remove them from ;; the global list.