File tree Expand file tree Collapse file tree 1 file changed +5
-4
lines changed Expand file tree Collapse file tree 1 file changed +5
-4
lines changed Original file line number Diff line number Diff line change 51
51
(defun haskell-yas-complete (&rest args )
52
52
(apply haskell-yas-completing-function args))
53
53
54
+ (defconst haskell-snippets-dir
55
+ (expand-file-name " snippets" (file-name-directory (or (buffer-file-name ) load-file-name))))
56
+
54
57
;;;### autoload
55
58
(defun haskell-snippets-initialize ()
56
59
" Register haskell snippets with yasnippet."
57
- (let* ((this-dir (file-name-directory (or (buffer-file-name ) load-file-name)))
58
- (haskell-snippets-dir (expand-file-name " snippets" this-dir)))
59
- (add-to-list 'yas-snippet-dirs haskell-snippets-dir t )
60
- (yas-load-directory haskell-snippets-dir)))
60
+ (add-to-list 'yas-snippet-dirs haskell-snippets-dir t )
61
+ (yas-load-directory haskell-snippets-dir))
61
62
62
63
;;;### autoload
63
64
(eval-after-load 'yasnippet
You can’t perform that action at this time.
0 commit comments