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 (propertize
text 'face text 'face
(append (get-text-property 0 'face text) (append (get-text-property 0 'face text)
(let (_) (cond ((>= code 40)
(cond ((>= code 40) `(:background ,(caddr (assq style doom-ansi-alist))))
`(:background ,(caddr (assq style doom-ansi-alist)))) ((>= code 30)
((>= code 30) `(:foreground ,(face-foreground (caddr (assq style doom-ansi-alist)))))
`(:foreground ,(face-foreground (caddr (assq style doom-ansi-alist))))) ((cddr (assq style doom-ansi-alist)))))))))
((cddr (assq style doom-ansi-alist))))))))))
;;;###autoload ;;;###autoload
(defmacro format! (message &rest args) (defmacro format! (message &rest args)