X-Git-Url: https://git.distorted.org.uk/~mdw/skel/blobdiff_plain/7fb0878b62328fd3bf80e2142a5d68b314105eb1..4193db31dfd465f45997ff88937d6ced84421a82:/skel.el.in diff --git a/skel.el.in b/skel.el.in index d409011..9208f30 100644 --- a/skel.el.in +++ b/skel.el.in @@ -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 ;;; @@ -26,8 +26,11 @@ ;;;----- 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 ---