From: Juanma Barranquero <lekktu@gmail.com>
Date: Sun, 25 May 2003 01:31:48 +0000 (+0000)
Subject: (skeleton-pair-insert-maybe): Remove leftover reference to
X-Git-Tag: ttn-vms-21-2-B4~9960
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6160f09bec0f89a66a01e189f14f141e1452c4d;p=emacs.git

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

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