(skeleton-pair-insert-maybe): Remove leftover reference to

skeleton-abbrev-cleanup.

diff --git a/lisp/skeleton.el b/lisp/skeleton.el
index 12ca2fb3247b5b43ad5ba9b4cd86ab610c394a59..aea5aa772369407fc6a9bcf7627dd65be5080085 100644 (file)
--- 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)))))
 
 \f
 ;; A more serious example can be found in sh-script.el