workgroups2 Changeset - d8599e3f9ec9

Changeset - d8599e3f9ec9

Parent rev.

Child rev.

[Not reviewed]

0 2 0

Sergey Pashinin - 11 years ago 2014-07-20 08:30:54
sergey@pashinin.com

wg-modeline-string for #42

2 files changed with 6 insertions and 1 deletions:

src/workgroups-variables.el

src/workgroups2.el

0 comments (0 inline, 0 general)

src/workgroups-variables.el

➞

Show inline comments

@@ @@ -24,6 +24,11 @@ @@
   :type 'string
   :group 'workgroups)
 (defcustom wg-modeline-string " wg"
   "Appears in modeline."
   :type 'string
   :group 'workgroups)
 (defcustom wg-load-last-workgroup t
   "Load last active (not first) workgroup from all your workgroups if it exists."
   :group 'workgroups

src/workgroups2.el

➞

Show inline comments

@@ @@ -216,7 +216,7 @@ Called when `workgroups-mode' is turned off." @@
 Adds entries to `minor-mode-list', `minor-mode-alist' and
 `minor-mode-map-alist'."
   (cl-pushnew 'workgroups-mode minor-mode-list)
-  (cl-pushnew '(workgroups-mode " wg") minor-mode-alist :test 'equal)
+  (cl-pushnew '(workgroups-mode wg-modeline-string) minor-mode-alist :test 'equal)
   (setq minor-mode-map-alist
         (cons (cons 'workgroups-mode (wg-make-workgroups-mode-map))
               (delete (assoc 'workgroups-mode minor-mode-map-alist)

0 comments (0 inline, 0 general)