[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 1061db94ac 3/5: org: Tweak styling of url in resour
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 1061db94ac 3/5: org: Tweak styling of url in resource prompt |
Date: |
Sat, 17 Sep 2022 07:57:54 -0400 (EDT) |
branch: externals/org
commit 1061db94acf785f4b8f1140649e3857d52693115
Author: TEC <git@tecosaur.net>
Commit: TEC <git@tecosaur.net>
org: Tweak styling of url in resource prompt
* lisp/org.el (org--confirm-resource-safe): Style domain with a link,
and url with an underline.
---
lisp/org.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/org.el b/lisp/org.el
index 618e420158..3bb34256ab 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -4586,13 +4586,15 @@ returns non-nil if any of them match."
(if domain
(concat
(propertize "d" 'face 'success)
- " to download this resource, and mark this domain as
safe.\n ")
+ " to download this resource, and mark the domain ("
+ (propertize domain 'face '(:inherit org-link :weight
normal))
+ ") as safe.\n ")
"")
(propertize "f" 'face 'success)
(if current-file
(concat
" to download this resource, and permanantly mark all
resources in "
- (propertize current-file 'face 'fixed-pitch-serif)
+ (propertize current-file 'face 'underline)
" as safe.\n ")
"")
(propertize "y" 'face 'warning)