changeset 51218:815164749c9a

(skeleton-pair-insert-maybe): Remove leftover reference to skeleton-abbrev-cleanup.
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 25 May 2003 01:31:48 +0000
parents 7d48b06d1fd1
children b86109f9a829
files lisp/skeleton.el
diffstat 1 files changed, 9 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/skeleton.el	Sun May 25 00:45:01 2003 +0000
+++ b/lisp/skeleton.el	Sun May 25 01:31:48 2003 +0000
@@ -491,16 +491,15 @@
 		     (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