larstvei/Focus
1
0
Fork 0
mirror of https://github.com/larstvei/Focus.git synced 2025-01-31 04:30:13 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Defined variables to help hide the cursor

Browse Source 
Used in focus-read-only-mode
This commit is contained in:
Lars Tveito 2015-05-24 02:02:03 +02:00
parent ac711fe13a
commit 94ed8ab68b
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
focus.el
View File

@ -65,15 +65,26 @@ Things that are defined include `symbol', `list', `sexp',
:type '(repeat symbol) :type '(repeat symbol)
:group 'focus) :group 'focus)
(defcustom focus-read-only-blink-seconds 1
"The duration of a cursor blink in `focus-read-only-mode'."
:type '(float)
:group 'focus)
(defvar focus-pre-overlay nil (defvar focus-pre-overlay nil
"The overlay that dims the text prior to the current-point.") "The overlay that dims the text prior to the current-point.")
(defvar focus-post-overlay nil (defvar focus-post-overlay nil
"The overlay that dims the text past the current-point.") "The overlay that dims the text past the current-point.")
(defvar focus-read-only-blink-timer nil
"Timer started from `focus-read-only-cursor-blink'.
The timer calls `focus-read-only-hide-cursor' after
`focus-read-only-blink-seconds' seconds.")
;; Use make-local-variable for backwards compatibility. ;; Use make-local-variable for backwards compatibility.
(dolist (var '(focus-pre-overlay (dolist (var '(focus-pre-overlay
focus-post-overlay)) focus-post-overlay
focus-read-only-blink-timer))
(make-local-variable var)) (make-local-variable var))
;; Changing major-mode should not affect Focus mode. ;; Changing major-mode should not affect Focus mode.