diff --git a/README.org b/README.org
index 20d62ec..f78451f 100644
--- a/README.org
+++ b/README.org
@@ -33,7 +33,7 @@ Then put a call to =exwm-modeline-mode= somewhere after the moment when EXWM has
 * Customization
 Set =exwm-modeline-randr= to nil to turn off filtering of workspaces by monitor.
 
-Set =exwm-modeline-short= to display only the current workspace in the modeline.
+Set =exwm-modeline-short= to =t= display only the current workspace in the modeline.
 
 * Credits
 [[https://github.com/nex3/perspective-el][perspective.el]] by [[https://github.com/nex3][@nex3]] was extremely instructive on how to make a modeline segment individual to a particular frame and avoid recalculating it too often.
diff --git a/exwm-modeline.el b/exwm-modeline.el
index 1776f42..90e9ed7 100644
--- a/exwm-modeline.el
+++ b/exwm-modeline.el
@@ -6,7 +6,7 @@
 
 ;; Author: Korytov Pavel <thexcloud@gmail.com>
 ;; Maintainer: Korytov Pavel <thexcloud@gmail.com>
-;; Version: 0.1.0
+;; Version: 0.1.1
 ;; Package-Requires: ((emacs "27.1") (exwm "0.26"))
 ;; Homepage: https://github.com/SqrtMinusOne/pomm.el
 
@@ -66,8 +66,10 @@ workspaces."
   :type 'boolean)
 
 (defface exwm-modeline-current-workspace
-  '((t (:inherit warning :weight bold)))
-  "Face for the current workspace."
+  ;; I'd rather :inherit warning there, but that could lead to
+  ;; unexpected effects.
+  `((t :foreground ,(face-foreground 'warning) :weight bold))
+  "Face for the current workspace. "
   :group 'exwm-modeline)
 
 (defface exwm-modeline-populated-workspace
@@ -81,7 +83,7 @@ workspaces."
   :group 'exwm-modeline)
 
 (defface exwm-modeline-urgent-workspace
-  '((t (:inherit error :weight bold)))
+  '((t (:inherit custom-invalid)))
   "Face for any workspace that is tagged as urgent by X."
   :group 'exwm-modeline)