[gnu] externals/doric-themes 563791fc69 5/5: Define styles for "subtle shadow" links

[ELPA Syncer]

branch: externals/doric-themes
commit 563791fc69da3ff45382458e3714c7d2c348fd2d
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>

    Define styles for "subtle shadow" links
---
 doric-themes.el            | 13 ++++++++-----
 tests/doric-themes-test.el |  1 +
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/doric-themes.el b/doric-themes.el
index 971828d11e..82550651ce 100644
--- a/doric-themes.el
+++ b/doric-themes.el
@@ -1217,14 +1217,9 @@ Run `doric-themes-after-load-theme-hook' after loading a 
theme."
     denote-faces-link
     denote-faces-query-link
     dictionary-reference-face
-    dired-symlink
-    diredfl-symlink
-    eshell-ls-symlink
     info-node
     info-xref
-    info-xref-visited
     link
-    link-visited
     marginalia-file-priv-link
     org-cite
     org-cite-key
@@ -1234,6 +1229,13 @@ Run `doric-themes-after-load-theme-hook' after loading a 
theme."
     rcirc-url
     shr-link))
 
+(defconst doric-themes-underline-subtle-shadow-faces
+  '(dired-symlink
+    diredfl-symlink
+    eshell-ls-symlink
+    info-xref-visited
+    link-visited))
+
 (defconst doric-themes-diff-added-faces
   '(denote-faces-prompt-new-name
     diff-added
@@ -1525,6 +1527,7 @@ default to a generic text that mentions the 
BACKGROUND-MODE."
               ,@(doric-themes-prepare-faces doric-themes-italic-faces :inherit 
''italic :foreground 'fg-shadow-subtle)
               ,@(doric-themes-prepare-faces doric-themes-italic-only-faces 
:inherit ''italic)
               ,@(doric-themes-prepare-faces doric-themes-underline-link-faces 
:inherit ''underline :foreground 'fg-accent)
+              ,@(doric-themes-prepare-faces 
doric-themes-underline-subtle-shadow-faces :inherit ''underline :foreground 
'fg-shadow-subtle)
               ,@(doric-themes-prepare-faces 
doric-themes-underline-emphasis-faces :inherit ''(underline italic) :foreground 
'fg-shadow-subtle)
               ,@(doric-themes-prepare-faces 
doric-themes-underline-emphasis-subtle-faces :underline 'border)
 
diff --git a/tests/doric-themes-test.el b/tests/doric-themes-test.el
index dbae7e00be..3d97d82222 100644
--- a/tests/doric-themes-test.el
+++ b/tests/doric-themes-test.el
@@ -51,6 +51,7 @@
     doric-themes-underline-emphasis-faces
     doric-themes-underline-emphasis-subtle-faces
     doric-themes-underline-link-faces
+    doric-themes-underline-subtle-shadow-faces
     doric-themes-diff-added-faces
     doric-themes-diff-added-highlight-faces
     doric-themes-diff-added-refine-faces