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

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

[elpa] externals/vlf e387ed5 035/310: Add forgotten local variable state


From: Stefan Monnier
Subject: [elpa] externals/vlf e387ed5 035/310: Add forgotten local variable statement and documentation.
Date: Sat, 28 Nov 2020 00:32:42 -0500 (EST)

branch: externals/vlf
commit e387ed5f0935f0a33f4d04e086b4ef984b50a274
Author: Andrey Kotlarski <m00naticus@gmail.com>
Commit: Andrey Kotlarski <m00naticus@gmail.com>

    Add forgotten local variable statement and documentation.
---
 vlfi.el | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/vlfi.el b/vlfi.el
index 7b016e2..fa5ae7f 100644
--- a/vlfi.el
+++ b/vlfi.el
@@ -48,9 +48,11 @@
   :group 'vlfi)
 
 ;; Keep track of file position.
-(defvar vlfi-start-pos)
-(defvar vlfi-end-pos)
-(defvar vlfi-file-size)
+(defvar vlfi-start-pos 0
+  "Absolute position of the visible chunk start.")
+(defvar vlfi-end-pos vlfi-batch-size
+  "Absolute position of the visible chunk end.")
+(defvar vlfi-file-size 0 "Total size of presented file.")
 
 (defvar vlfi-mode-map
   (let ((map (make-sparse-keymap)))
@@ -76,8 +78,10 @@
   "Mode to browse large files in."
   (setq buffer-read-only t)
   (set-buffer-modified-p nil)
+  (buffer-disable-undo)
   (make-local-variable 'vlfi-batch-size)
   (make-local-variable 'vlfi-start-pos)
+  (make-local-variable 'vlfi-end-pos)
   (make-local-variable 'vlfi-file-size))
 
 (defun vlfi-change-batch-size (decrease)
@@ -212,7 +216,6 @@ buffer.  You can customize number of bytes displayed by 
customizing
 `vlfi-batch-size'."
   (interactive "fFile to open: \nP")
   (with-current-buffer (generate-new-buffer "*vlfi*")
-    (buffer-disable-undo)
     (setq buffer-file-name file
           vlfi-file-size (nth 7 (file-attributes file)))
     (vlfi-insert-file file from-end)



reply via email to

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