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

ui/doom-dashboard: minor refactor

Browse source
This commit is contained in:
Henrik Lissner 2018-07-05 01:32:04 +02:00
parent ad5470ce3f
commit 1fa4c65c3a
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
modules/ui/doom-dashboard/config.el
View file

@ -399,11 +399,12 @@ controlled by `+doom-dashboard-pwd-policy'."
(or icon "") (or icon "")
(with-temp-buffer (with-temp-buffer
(insert-text-button (insert-text-button
(propertize label 'face (or face 'font-lock-keyword-face)) label
'action 'action
`(lambda (_) `(lambda (_)
(call-interactively (or (command-remapping #',action) (call-interactively (or (command-remapping #',action)
#',action))) #',action)))
'face (or face 'font-lock-keyword-face)
'follow-link t 'follow-link t
'help-echo label) 'help-echo label)
(format "%-37s" (buffer-string))) (format "%-37s" (buffer-string)))
@ -432,7 +433,7 @@ controlled by `+doom-dashboard-pwd-policy'."
(with-temp-buffer (with-temp-buffer
;; TODO Publish the site! ;; TODO Publish the site!
;; (insert-text-button (propertize "doomemacs.org" 'face 'font-lock-keyword-face) ;; (insert-text-button (propertize "doomemacs.org" 'face 'font-lock-keyword-face)
;; 'action (lambda (_) (browse-url "http://github.com/hlissner/doom-emacs")) ;; 'action (lambda (_) (browse-url "http://doomemacs.org"))
;; 'follow-link t ;; 'follow-link t
;; 'help-echo "Open home page") ;; 'help-echo "Open home page")
;; (insert (propertize " x " 'face 'font-lock-comment-face)) ;; (insert (propertize " x " 'face 'font-lock-comment-face))