mirror of
https://github.com/larstvei/Focus.git
synced 2024-11-26 11:38:32 +00:00
Changing modes should not affect Focus mode
This commit is contained in:
parent
5bddbbb7d3
commit
b4fb132314
6
focus.el
6
focus.el
@ -65,6 +65,12 @@ Things that are defined include `symbol', `list', `sexp',
|
|||||||
(defvar-local focus-post-overlay nil
|
(defvar-local focus-post-overlay nil
|
||||||
"The overlay that dims the text past the current-point.")
|
"The overlay that dims the text past the current-point.")
|
||||||
|
|
||||||
|
;; Changing major-mode should not affect Focus mode.
|
||||||
|
(dolist (var '(focus-pre-overlay
|
||||||
|
focus-post-overlay
|
||||||
|
post-command-hook))
|
||||||
|
(put var 'permanent-local t))
|
||||||
|
|
||||||
(defun focus-any (f lst)
|
(defun focus-any (f lst)
|
||||||
"This function takes a function and a list, and returns the
|
"This function takes a function and a list, and returns the
|
||||||
first NON-NIL value from applying F to an element in LST."
|
first NON-NIL value from applying F to an element in LST."
|
||||||
|
Loading…
Reference in New Issue
Block a user