tec/emacs-config
tec/emacs-config
1
0
Fork 0
Code Issues 4 Pull requests Releases Activity

Ooops, I forgot to get rid of some debug stuff

Browse source
This commit is contained in:
tecosaur 2020-05-15 14:10:44 +08:00
parent 2509deb106
commit 620f2c57d0
1 changed files with 0 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
config.org
View file

@ -1181,13 +1181,8 @@ Let's setup some org-capture templates
"Add declaration's :icon to each template group in GROUPS."
(let ((templates (doct-flatten-lists-in groups)))
(setq doct-templates (mapcar (lambda (template)
(message "-------")
(pp template)
(message "-- %d" (length template))
(when-let* ((props (nthcdr (if (= (length template) 4) 2 5) template))
(spec (plist-get (plist-get props :doct) :icon)))
(message "--icon found")
(pp spec)
(setf (nth 1 template) (concat (+doct-icon-declaration-to-icon spec)
"\t"
(nth 1 template))))