jflack
/
yasnippet-snippets
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add snippet dir with symbol indirection (#230) 

* yasnippet-snippets.el (yasnippet-snippets-dir): Define with
defconst, set to the "snippets" directory.
(yasnippet-snippets-initialize): Add `yasnippet-snippets-dir' as a
symbol.  Drop the boundp check, as we are already doing (require
'yasnippet).
This commit is contained in:
Noam Postavsky 2017-11-25 05:45:07 -05:00 committed by Andrea Crotti
parent 13bee06e1f
commit 871c6f022d
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
yasnippet-snippets.el
View File

@ -31,21 +31,21 @@
(require 'yasnippet)
(setq yasnippet-snippets-dir
(file-name-directory
;; Copied from ‘f-this-file’ from f.el.
(cond
(load-in-progress load-file-name)
((and (boundp 'byte-compile-current-file) byte-compile-current-file)
byte-compile-current-file)
(:else (buffer-file-name)))))
(defconst yasnippet-snippets-dir
(expand-file-name
"snippets"
(file-name-directory
;; Copied from ‘f-this-file’ from f.el.
(cond
(load-in-progress load-file-name)
((and (boundp 'byte-compile-current-file) byte-compile-current-file)
byte-compile-current-file)
(:else (buffer-file-name))))))
;;;###autoload
(defun yasnippet-snippets-initialize ()
(let ((snip-dir (expand-file-name "snippets" yasnippet-snippets-dir)))
(when (boundp 'yas-snippet-dirs)
(add-to-list 'yas-snippet-dirs snip-dir t))
(yas-load-directory snip-dir)))
(add-to-list 'yas-snippet-dirs 'yasnippet-snippets-dir t)
(yas-load-directory yasnippet-snippets-dir))
;;;###autoload
(eval-after-load 'yasnippet