;;; -*-emacs-lisp-*-
;;;
-;;; $Id: skel.el.in,v 1.5 2004/04/08 01:36:28 mdw Exp $
-;;;
;;; Filling in skeletons
;;;
;;; (c) 1998 Mark Wooding
(funcall switch (find-file-noselect name))
(kill-region (point-min) (point-max))
- (insert-file skel)
+ (insert-file-contents skel)
;; --- Mangle the skeleton data in the file ---