[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 66ad6564a2 2/2: * lisp/term/haiku-win.el (x-colors): Also update
|
From: |
Po Lu |
|
Subject: |
master 66ad6564a2 2/2: * lisp/term/haiku-win.el (x-colors): Also update with system colors. |
|
Date: |
Sun, 24 Apr 2022 01:46:04 -0400 (EDT) |
branch: master
commit 66ad6564a22e013b3f4091ba851b7a115b5970a4
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>
* lisp/term/haiku-win.el (x-colors): Also update with system colors.
---
lisp/term/haiku-win.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/lisp/term/haiku-win.el b/lisp/term/haiku-win.el
index dddad544fa..c83e0a5c3d 100644
--- a/lisp/term/haiku-win.el
+++ b/lisp/term/haiku-win.el
@@ -98,6 +98,9 @@ for more details on the structure of the associations.")
"B_LINK_VISITED_COLOR" "B_LINK_ACTIVE_COLOR"
"B_STATUS_BAR_COLOR" "B_SUCCESS_COLOR" "B_FAILURE_COLOR"])
+;; Also update `x-colors' to take that into account.
+(setq x-colors (append haiku-allowed-ui-colors x-colors))
+
(defun haiku-selection-bounds (value)
"Return bounds of selection value VALUE.
The return value is a list (BEG END BUF) if VALUE is a cons of