Browse Source

Small improvements over the previous commit.

Use org-propertize instead of propertize and
use a better default for tags in the mode-line
when filtering.
Bastien Guerry 7 years ago
parent
commit
3267c69ccd
2 changed files with 4 additions and 5 deletions
  1. 1 1
      lisp/org-agenda.el
  2. 3 4
      lisp/org-faces.el

+ 1 - 1
lisp/org-agenda.el

@@ -6767,7 +6767,7 @@ When called with a prefix argument, include all archive files as well."
 	      ;; show tags used for filtering in a custom face
 	      (if (or org-agenda-filter (get 'org-agenda-filter
 					     :preset-filter))
-		  '(:eval (propertize
+		  '(:eval (org-propertize
 			   (concat " {"
 				   (mapconcat
 				    'identity

+ 3 - 4
lisp/org-faces.el

@@ -673,10 +673,9 @@ month and 365.24 days for a year)."
   :group 'org-faces)
 
 (defface org-agenda-filter-tags
-  (org-compatible-face nil
-    '((((background light)) (:foreground "orange"))
-      (((background dark))  (:foreground "orange"))))
-  "Face for showing the tags (in the mode-line) which are used in the agenda filtering."
+  (org-compatible-face 'default
+    nil)
+  "Face for tag(s) in the mode-line when filtering the agenda."
   :group 'org-faces)
 
 (defface org-time-grid ;; originally copied from font-lock-variable-name-face