branch: master
commit 9abf842e356e7b42fa105fe6284fb5ebe58a7ed1
Author: Noam Postavsky <npost...@users.sourceforge.net>
Commit: Noam Postavsky <npost...@users.sourceforge.net>
Enable snippet-mode automatically
* yasnippet.el (yas-snippet-mode-buffer-p): New function, detects
buffers visiting files under `yas-snippet-dirs'. Add it
`magic-fallback-mode-alist' to enable `snippet-mode' automatically,.
---
yasnippet.el | 15 +++++++++++++++
1 file changed, 15 insertions(+)
diff --git a/yasnippet.el b/yasnippet.el
index fa538c1..644aa90 100644
--- a/yasnippet.el
+++ b/yasnippet.el
@@ -915,6 +915,21 @@ Honour `yas-dont-activate-functions', which see."
(set (make-local-variable 'comment-start-skip) "#+[\t ]*")
(add-hook 'after-save-hook #'yas-maybe-load-snippet-buffer nil t))
+(defun yas-snippet-mode-buffer-p ()
+ "Return non-nil if current buffer should be in `snippet-mode'.
+Meaning it's visiting a file under one of the mode directories in
+`yas-snippet-dirs'."
+ (when buffer-file-name
+ (member
+ (expand-file-name
+ ".."
+ (file-name-directory buffer-file-name))
+ (yas-snippet-dirs))))
+
+;; We're abusing `magic-fallback-mode-alist' here because
+;; `auto-mode-alist' doesn't support function matchers.
+(add-to-list 'magic-fallback-mode-alist
+ `(yas-snippet-mode-buffer-p . snippet-mode))
;;; Internal structs for template management
