core-autoinsert: inline auto-insert-template fn

This commit is contained in:
Henrik Lissner 2016-05-18 02:14:35 -04:00
parent 3504cda888
commit a1dce80783

View file

@ -8,12 +8,10 @@
:config :config
(auto-insert-mode 1) (auto-insert-mode 1)
(defun auto-insert-template (rule) (mapc (lambda (rule)
(define-auto-insert (define-auto-insert
(nth 0 rule) (nth 0 rule)
(vector `(lambda () (narf/auto-insert-snippet ,(nth 1 rule) ',(nth 2 rule) ,(nth 3 rule)))))) (vector `(lambda () (narf/auto-insert-snippet ,(nth 1 rule) ',(nth 2 rule) ,(nth 3 rule))))))
(mapc 'auto-insert-template
`(;; General `(;; General
("/\\.gitignore$" "__" gitignore-mode) ("/\\.gitignore$" "__" gitignore-mode)
("/Dockerfile$" "__" dockerfile-mode) ("/Dockerfile$" "__" dockerfile-mode)