branch: externals/lin
commit c57708fb1f3448c4973dea41d8d22019856f2b61
Author: Kai von Fintel <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Make `lin-mac-override(-fg)' work on emacs-mac (Emacs Mac port)
The emacs-mac port of emacs (https://bitbucket.org/mituharu/emacs-mac)
returns a different value for the window system ("mac" instead of
"ns") and its system color specifications have a "mac:" prefix. This
change makes the use of macOS system colors for the lin-highlighting
work in both major kinds of emacs versions on macOS.
---
lin.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lin.el b/lin.el
index a51479646f..cf9a39172a 100644
--- a/lin.el
+++ b/lin.el
@@ -268,12 +268,15 @@ updates the face. Users who prefer to use `setq' must run
'((((type ns))
;;
<https://developer.apple.com/design/human-interface-guidelines/macos/visual-design/color/>.
:background "selectedContentBackgroundColor" :extend t)
+ (((type mac))
+ :background "mac:selectedContentBackgroundColor" :extend t)
(t :inherit lin-blue))
"Alternative macOS-style face for `lin-face'."
:group 'lin-faces)
(defface lin-mac-override-fg
- '((t :inherit lin-mac :foreground "alternateSelectedControlTextColor"))
+ '((((type ns)) :inherit lin-mac :foreground
"alternateSelectedControlTextColor")
+ (((type mac)) :inherit lin-mac :foreground
"mac:alternateSelectedControlTextColor"))
"Like `lin-mac' but also sets a foreground."
:group 'lin-faces)
