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

Remove unnecessary let block

Browse source
This commit is contained in:
Henrik Lissner 2018-09-09 16:39:25 -04:00 • committed by Edwin Török
parent 8f5d822363
commit d9a9243a62
1 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

11
core/autoload/message.el
View file

@ -47,12 +47,11 @@ Otherwise, it maps colors to a term-color-* face."
(propertize
text 'face
(append (get-text-property 0 'face text)
(let (_)
(cond ((>= code 40)
`(:background ,(caddr (assq style doom-ansi-alist))))
((>= code 30)
`(:foreground ,(face-foreground (caddr (assq style doom-ansi-alist)))))
((cddr (assq style doom-ansi-alist))))))))))
(cond ((>= code 40)
`(:background ,(caddr (assq style doom-ansi-alist))))
((>= code 30)
`(:foreground ,(face-foreground (caddr (assq style doom-ansi-alist)))))
((cddr (assq style doom-ansi-alist)))))))))
;;;###autoload
(defmacro format! (message &rest args)