Merge pull request #26 from phikal/master

This commit is contained in:
Lars Tveito 2022-09-06 23:30:20 +02:00 committed by GitHub
commit fd65701b8c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -69,7 +69,7 @@ Things that are defined include `symbol', `list', `sexp',
:group 'focus)
(defvar focus-cursor-type cursor-type
"Used to restore the users `cursor-type'")
"Used to restore the users `cursor-type'.")
(defvar-local focus-current-thing nil
"Overrides the choice of thing dictated by `focus-mode-to-thing' if set.")
@ -114,7 +114,7 @@ command."
(focus-move-overlays (car bounds) (cdr bounds))))))
(defun focus-move-overlays (low high)
"Move `focus-pre-overlay', `focus-mid-overlay' and `focus-post-overlay'."
"Move the overlays to highlight the region between LOW and HIGH."
(move-overlay focus-pre-overlay (point-min) low)
(move-overlay focus-mid-overlay low high)
(move-overlay focus-post-overlay high (point-max)))