Misc tidying.
authormdw <mdw>
Wed, 5 May 1999 19:30:38 +0000 (19:30 +0000)
committermdw <mdw>
Wed, 5 May 1999 19:30:38 +0000 (19:30 +0000)
skel.el.in

index d409011..9208f30 100644 (file)
@@ -1,6 +1,6 @@
 ;;; -*-emacs-lisp-*-
 ;;;
-;;; $Id: skel.el.in,v 1.1 1999/04/05 13:44:59 mdw Exp $
+;;; $Id: skel.el.in,v 1.2 1999/05/05 19:30:38 mdw Exp $
 ;;;
 ;;; Filling in skeletons
 ;;;
 ;;;----- Revision history ---------------------------------------------------
 ;;;
 ;;; $Log: skel.el.in,v $
-;;; Revision 1.1  1999/04/05 13:44:59  mdw
-;;; Initial revision
+;;; Revision 1.2  1999/05/05 19:30:38  mdw
+;;; Misc tidying.
+;;;
+;;; Revision 1.1.1.1  1999/04/05 13:44:59  mdw
+;;; Initial import.
 ;;;
 
 ;;;----- Variables (largely tweakable) --------------------------------------
@@ -110,7 +113,7 @@ first.  ACC is a base list to which the matching filenames are prepended."
                      (append (skel-parents default-directory)
                              skel-skeleton-path)
                      skel-directory-list
-                     (if (listp name) name (cons name nil)))))
+                     (if (consp name) name (cons name nil)))))
 
     ;; --- Now filter out any which aren't interesting ---
 
@@ -171,7 +174,7 @@ argument is called to display the buffer."
   ;;
   ;; This is a little bit of a hack, but do I look like someone who cares?
 
-  (let (ext rc)
+  (let (ext)
 
     ;; --- Find out if the file's there already ---