use full key extension as "name" when no "name" property defined.

This commit is contained in:
Zhang Chiyuan 2008-08-01 05:04:47 +00:00
parent e9cd192bda
commit b3aa297b95

View File

@ -1094,7 +1094,7 @@ parent mode. The PARENT-MODE may not need to be a real mode."
(dolist (snippet snippets) (dolist (snippet snippets)
(let* ((full-key (car snippet)) (let* ((full-key (car snippet))
(key (file-name-sans-extension full-key)) (key (file-name-sans-extension full-key))
(name (caddr snippet)) (name (or (caddr snippet) (file-name-extension full-key)))
(condition (nth 3 snippet)) (condition (nth 3 snippet))
(template (yas/make-template (cadr snippet) (template (yas/make-template (cadr snippet)
(or name key) (or name key)