master a98bf3e: * lisp/cus-start.el: Add mode-line-compact to Customize

[Lars Ingebrigtsen]

branch: master
commit a98bf3e7d713cb944c38ae6f784dc26d532b8e71
Author: Illia Ostapyshyn <ilya.ostapyshyn@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    * lisp/cus-start.el: Add mode-line-compact to Customize
    
    * lisp/cus-start.el (standard): Make `mode-line-compact' into a
    user option (bug#49687).
    
    Copyright-paperwork-exempt: yes
---
 lisp/cus-start.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 3c2625a..50a6bd2 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -631,6 +631,12 @@ since it could result in memory overflow and make Emacs 
crash."
             ;; The whitespace group is for whitespace.el.
             (show-trailing-whitespace editing-basics boolean nil
                                       :safe booleanp)
+             (mode-line-compact
+              mode-line
+              (choice (const :tag "Never (nil)" :value nil)
+                      (const :tag "Only if wider than window (long)" :value 
long)
+                      (const :tag "Always (t)" :value t))
+              "28.1")
             (scroll-step windows integer)
             (scroll-conservatively windows integer)
             (scroll-margin windows integer)