emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

caddr => cl-caddr

Browse source
This commit is contained in:
Henrik Lissner 2017-02-13 04:41:27 -05:00
parent 6f67dff8f2
commit b4e9f1312d
4 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
modules/feature/evil/autoload/evil.el
View file

@ -10,7 +10,7 @@ flags."
"\\(\\(?::\\(?:[phtreS~.]\\|g?s[^: $]+\\)\\)*\\)"))
case-fold-search)
(dolist (match (s-match-strings-all regexp file-name))
(let ((flags (split-string (caddr match) ":" t))
(let ((flags (split-string (cl-caddr match) ":" t))
(path (file-relative-name
(pcase (cadr match)
("@" (doom-project-root))

4
modules/feature/file-templates/config.el
View file

@ -102,8 +102,8 @@
(require 'yasnippet)
(unless yas-minor-mode
(yas-minor-mode-on))
(let ((snippet (let ((template (cdar (mapcan #'(lambda (table) (yas--fetch table key))
(yas--get-snippet-tables mode)))))
(let ((snippet (let ((template (cdar (cl-mapcan #'(lambda (table) (yas--fetch table key))
(yas--get-snippet-tables mode)))))
(if template (yas--template-content template) nil))))
(when (and yas-minor-mode snippet)
(yas-expand-snippet snippet)