;;; -*-emacs-lisp-*-

(skel-include "skelrc.shelly")
(setq skel-alist
      (append
       '((first-line . "#! [[shebang-line]]"))
       skel-alist))

(let ((alist interpreter-mode-alist)
      (interp (skel-lookup "shebang-line")))
  (catch 'found
    (save-match-data
      (while alist
	(if (string-match (caar alist) interp)
	    (progn
	      (skelrc-force-mode (cdar alist))
	      (throw 'found nil)))
	(setq alist (cdr alist))))))