emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/focus ab42b87799 68/82: Fix buffer-local variables definit


From: ELPA Syncer
Subject: [nongnu] elpa/focus ab42b87799 68/82: Fix buffer-local variables definition
Date: Tue, 6 Sep 2022 04:58:58 -0400 (EDT)

branch: elpa/focus
commit ab42b8779929beeb7878c7fb3d3ccd80d9327c7f
Author: zsxh <bnbvbchen@gmail.com>
Commit: zsxh <bnbvbchen@gmail.com>

    Fix buffer-local variables definition
    
    Define focus-current-thing, focus-buffer, focus-pre-overlay,
    focus-post-overlay, focus-read-only-blink-timer as buffer-local variable
---
 focus.el | 18 +++++-------------
 1 file changed, 5 insertions(+), 13 deletions(-)

diff --git a/focus.el b/focus.el
index 268ff062ad..82be9c9035 100644
--- a/focus.el
+++ b/focus.el
@@ -73,31 +73,23 @@ Things that are defined include `symbol', `list', `sexp',
 (defvar focus-cursor-type cursor-type
   "Used to restore the users `cursor-type'")
 
-(defvar focus-current-thing nil
+(defvar-local focus-current-thing nil
   "Overrides the choice of thing dictated by `focus-mode-to-thing' if set.")
 
-(defvar focus-buffer nil
+(defvar-local focus-buffer nil
   "Local reference to the buffer focus functions operate on.")
 
-(defvar focus-pre-overlay nil
+(defvar-local focus-pre-overlay nil
   "The overlay that dims the text prior to the current-point.")
 
-(defvar focus-post-overlay nil
+(defvar-local focus-post-overlay nil
   "The overlay that dims the text past the current-point.")
 
-(defvar focus-read-only-blink-timer nil
+(defvar-local 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.
-(dolist (var '(focus-current-thing
-               focus-buffer
-               focus-pre-overlay
-               focus-post-overlay
-               focus-read-only-blink-timer))
-  (make-local-variable var))
-
 (defun focus-get-thing ()
   "Return the current thing, based on `focus-mode-to-thing'."
   (or focus-current-thing



reply via email to

[Prev in Thread] Current Thread [Next in Thread]