alx/eyebrowse
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Let-bind deactivate-mark in mode line code

Browse Source 
Closes #34
This commit is contained in:
Vasilij Schneidermann
2015-06-15 08:31:17 +02:00
parent 0cd51f4852
commit 156623960f
1 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
eyebrowse.el
View File

@ -488,7 +488,12 @@ is detected, extra key bindings will be set up with
(tag (nth 2 window-config)) (tag (nth 2 window-config))
(format-string (if (and tag (> (length tag) 0)) (format-string (if (and tag (> (length tag) 0))
eyebrowse-tagged-slot-format eyebrowse-tagged-slot-format
eyebrowse-slot-format))) eyebrowse-slot-format))
;; NOTE: `format-spec' sets `deactivate-mark' to t which
;; makes `eyebrowse-format-slot' usage in
;; `eyebrowse-mode-line-indicator' always deactivate the mark
;; after activating it as this triggers mode line updates...
deactivate-mark)
(format-spec format-string (format-spec format-string
(format-spec-make ?s slot ?t tag)))) (format-spec-make ?s slot ?t tag))))