summaryrefslogtreecommitdiff
path: root/common.el
diff options
context:
space:
mode:
Diffstat (limited to 'common.el')
-rw-r--r--common.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/common.el b/common.el
index 3b75063..25b775d 100644
--- a/common.el
+++ b/common.el
@@ -186,11 +186,14 @@ ARG means do this command ARG times."
;;; Hide some minor mode from the mode line display.
;;;###autoload
-(defmacro durand-hide-minor-mode (minor &optional to-require)
+(defmacro durand-hide-minor-mode (minor &optional to-require light)
"Hide MINOR from the mode line.
-Require TO-REQUIRE so that we don't have errors."
+Require TO-REQUIRE so that we don't have errors.
+
+Optional LIGHT means to use the lighter name instead of
+completely hiding it."
(cond (to-require (require to-require)))
- `(setcdr (assq ',minor minor-mode-alist) (list "")))
+ `(setcdr (assq ',minor minor-mode-alist) (list (or ,light ""))))
(provide 'common)
;;; common.el ends here.