diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/skeleton.el | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/lisp/skeleton.el b/lisp/skeleton.el index 12ca2fb3247..aea5aa77236 100644 --- a/lisp/skeleton.el +++ b/lisp/skeleton.el @@ -491,16 +491,15 @@ symmetrical ones, and the same character twice for the others." (funcall skeleton-pair-filter)))) (self-insert-command (prefix-numeric-value arg)) (setq last-command-char (logand last-command-char 255)) - (or skeleton-abbrev-cleanup - (skeleton-insert - (cons nil (or (assq last-command-char skeleton-pair-alist) - (assq last-command-char '((?( _ ?)) - (?[ _ ?]) - (?{ _ ?}) - (?< _ ?>) - (?` _ ?'))) - `(,last-command-char _ ,last-command-char))) - (if mark -1)))))) + (skeleton-insert + (cons nil (or (assq last-command-char skeleton-pair-alist) + (assq last-command-char '((?( _ ?)) + (?[ _ ?]) + (?{ _ ?}) + (?< _ ?>) + (?` _ ?'))) + `(,last-command-char _ ,last-command-char))) + (if mark -1))))) ;; A more serious example can be found in sh-script.el |