;ELC���
;;; Compiled
;;; in Emacs version 26.3
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'vlf)
#@63 Contains timer if vlf buffer is set to continuously recenter.
(defvar vlf-follow-timer nil (#$ . 423))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local vlf-follow-timer put permanent-local t] 4)
#@69 Recenter chunk around current point in VLF-BUFFER.

(fn VLF-BUFFER)
(defalias 'vlf-recenter #[257 "\205[�p
=\205[�\304e!\204�\304d!\205[�	\305`!\\\n\306\245\307 \203?�\305d!	\\\310	Z^\\]\"\266\311	Z!b\202Y�\312Z!\210\211W\205Y�\211ZW\205Y�\311	Z!b\266\202\207" [vlf-follow-timer vlf-start-pos vlf-batch-size vlf-file-size pos-visible-in-window-p position-bytes 2 buffer-modified-p vlf-move-to-chunk byte-to-position vlf-move-to-batch] 9 (#$ . 651)])
#@27 Stop continuous recenter.
(defalias 'vlf-stop-follow #[0 "\205�\301!\210\302\211\207" [vlf-follow-timer cancel-timer nil] 2 (#$ . 1122)])
#@81 Continuously recenter chunk around point every INTERVAL seconds.

(fn INTERVAL)
(defalias 'vlf-start-follow #[257 "\301
\211\302p$\303\304\305\306\307$\207" [vlf-follow-timer run-with-idle-timer vlf-recenter add-hook kill-buffer-hook vlf-stop-follow nil t] 6 (#$ . 1270)])
#@56 Toggle continuous chunk recenter around current point.
(defalias 'vlf-toggle-follow #[0 "\205�	\203�\302 \210\303\304!\207\305\306\307\310\"!\207" [vlf-mode vlf-follow-timer vlf-stop-follow message "Following stopped" vlf-start-follow read-number "Number of seconds: " 1] 4 (#$ . 1550) nil])
(provide 'vlf-follow)