diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-01-09 04:44:15 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-01-09 04:44:15 +0000 |
| commit | 8989a9203f73473569ddf83e505a846609def407 (patch) | |
| tree | 2dcc35b588e98388ef66ef39157e9d17290df217 /lisp/skeleton.el | |
| parent | a4d9b7bca3dc69efe89eecbd81ed96859f7cd818 (diff) | |
| download | emacs-8989a9203f73473569ddf83e505a846609def407.tar.gz | |
Replace last-command-char with last-command-event.
Diffstat (limited to 'lisp/skeleton.el')
| -rw-r--r-- | lisp/skeleton.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/skeleton.el b/lisp/skeleton.el index c816888912f..c7d9b0e6aad 100644 --- a/lisp/skeleton.el +++ b/lisp/skeleton.el @@ -470,7 +470,7 @@ This allows for context-sensitive checking whether pairing is appropriate.") (defvar skeleton-pair-alist () - "An override alist of pairing partners matched against `last-command-char'. + "An override alist of pairing partners matched against `last-command-event'. Each alist element, which looks like (ELEMENT ...), is passed to `skeleton-insert' with no interactor. Variable `str' does nothing. @@ -504,7 +504,7 @@ symmetrical ones, and the same character twice for the others." (or (eq last-command 'mouse-drag-region) (and transient-mark-mode mark-active)))) (skeleton-end-hook) - (char last-command-char) + (char last-command-event) (skeleton (or (assq char skeleton-pair-alist) (assq char skeleton-pair-default-alist) `(,char _ ,char)))) |