Re: FSF like smart header

[Andrea Crotti]

I head another idea to make it more general:
--8<---------------cut here---------------start------------->8---
;; (mode . (regexp snippet)
(setq auto-snips
             '((c-mode . '('h' "once"))
               (python-mode . (t "!"))))

(defun smart-snips()
  (let
      ((found (assoc major-mode auto-snips)))
    (if (and
         found
         (string-match (nth 0 found) major-mode)
         (yes-or-no-p "insert the header?"))
        (progn
          (insert (nth 1 found))
          (yas/expand)))))
--8<---------------cut here---------------end--------------->8---

In this way we define for every language (and possibly extension) what
snippet we want to expand when we create a file.

Then adding smart-snips to "find-file-hook" would do the rest of the magic.

It doesn't work yet because I guess c-mode is a symbol and string-match
doesn't like it.
Don't know if I should just use the string representation or if there's
a smarter way...