caddr => cl-caddr

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

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))