branch: externals/autorevert-tail-truncate
commit c7462550cc31c4d8eae7999fcc822abe33b0243b
Author: shipmints <shipmi...@gmail.com>
Commit: shipmints <shipmi...@gmail.com>

    Remove auto-revert-tail-truncate-check-vc-info
    
    Bind auto-revert-check-vc-info to nil for Emacs < 31.
---
 autorevert-tail-truncate.el | 11 +++--------
 1 file changed, 3 insertions(+), 8 deletions(-)

diff --git a/autorevert-tail-truncate.el b/autorevert-tail-truncate.el
index 37aeb4a7cc..95c8c0f16c 100644
--- a/autorevert-tail-truncate.el
+++ b/autorevert-tail-truncate.el
@@ -100,12 +100,6 @@ option `auto-revert-tail-truncate-max-lines', which see."
   :group 'auto-revert
   :type 'boolean)
 
-(defcustom auto-revert-tail-truncate-check-vc-info auto-revert-check-vc-info
-  "If non-nil `auto-revert-tail-truncate-mode' updates vc info.
-The default value is `auto-revert-check-vc-info', which see."
-  :group 'auto-revert
-  :type 'boolean)
-
 (defcustom auto-revert-tail-truncate-mode-text " TailTrunc"
   "Mode line string when `auto-revert-tail-truncate-mode' is active."
   :group 'auto-revert
@@ -141,8 +135,9 @@ Customize `auto-revert-tail-mode-hook' to control features 
such as
           (buffer-disable-undo))
         (when auto-revert-tail-truncate-disable-font-lock
           (font-lock-mode -1))
-        (make-local-variable 'auto-revert-check-vc-info)
-        (setq auto-revert-check-vc-info 
auto-revert-tail-truncate-check-vc-info)
+        (when (version< emacs-version "31")
+          (make-local-variable 'auto-revert-check-vc-info)
+          (setq auto-revert-check-vc-info nil))
         (goto-char (point-max))
         (when auto-revert-tail-truncate-immediately
           (auto-revert--tail-truncate))

Reply via email to