2010-08-31 04:59:05 +08:00
|
|
|
(:name yasnippet
|
2010-10-10 03:19:57 +08:00
|
|
|
:type svn
|
2010-12-18 16:21:27 +08:00
|
|
|
:url "http://yasnippet.googlecode.com/svn/trunk/"
|
2010-12-26 20:53:20 +08:00
|
|
|
:features "yasnippet"
|
2011-06-06 02:58:48 +08:00
|
|
|
:prepare (lambda ()
|
|
|
|
|
;; Set up the default snippets directory
|
|
|
|
|
;;
|
|
|
|
|
;; Principle: don't override any user settings
|
|
|
|
|
;; for yas/snippet-dirs, whether those were made
|
|
|
|
|
;; with setq or customize. If the user doesn't
|
|
|
|
|
;; want the default snippets, she shouldn't get
|
|
|
|
|
;; them!
|
|
|
|
|
(unless (or (boundp 'yas/snippet-dirs) (get 'yas/snippet-dirs 'customized-value))
|
|
|
|
|
(setq yas/snippet-dirs
|
|
|
|
|
(list (concat el-get-dir (file-name-as-directory "yasnippet") "snippets")))))
|
|
|
|
|
|
2011-02-25 05:03:47 +08:00
|
|
|
:post-init (lambda ()
|
2011-06-06 02:58:48 +08:00
|
|
|
;; Trick customize into believing the standard
|
|
|
|
|
;; value includes the default snippets.
|
|
|
|
|
;; yasnippet would probably do this itself,
|
|
|
|
|
;; except that it doesn't include an
|
|
|
|
|
;; installation procedure that sets up the
|
|
|
|
|
;; snippets directory, and thus doesn't know
|
|
|
|
|
;; where those snippets will be installed. See
|
|
|
|
|
;; http://code.google.com/p/yasnippet/issues/detail?id=179
|
|
|
|
|
(put 'yas/snippet-dirs 'standard-value
|
|
|
|
|
;; as cus-edit.el specifies, "a cons-cell
|
|
|
|
|
;; whose car evaluates to the standard
|
|
|
|
|
;; value"
|
|
|
|
|
(list (list 'quote
|
|
|
|
|
(list (concat el-get-dir (file-name-as-directory "yasnippet") "snippets"))))))
|
|
|
|
|
)
|
