From 78fda6bc7ea5d8a01d3ac74af03c96bd70749596 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Mon, 21 Jul 2025 09:24:23 +0200 Subject: [PATCH] Handle an error of file-notify-add-watch in autorevert.el * lisp/autorevert.el (auto-revert-notify-add-watch): Disable `auto-revert-use-notify' in the buffer when `file-notify-add-watch' fails. (cherry picked from commit ef84a1b2d65e187988ae4e66306ac17244a68fc5) --- lisp/autorevert.el | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/lisp/autorevert.el b/lisp/autorevert.el index 492bb565c25..a634756fcc1 100644 --- a/lisp/autorevert.el +++ b/lisp/autorevert.el @@ -671,12 +671,13 @@ will use an up-to-date value of `auto-revert-interval'." file (if buffer-file-name '(change attribute-change) '(change)) 'auto-revert-notify-handler)))) - (when auto-revert-notify-watch-descriptor - (setq auto-revert-notify-modified-p t - auto-revert--buffer-by-watch-descriptor - (cons (cons auto-revert-notify-watch-descriptor (current-buffer)) - auto-revert--buffer-by-watch-descriptor)) - (add-hook 'kill-buffer-hook #'auto-revert-notify-rm-watch nil t)))) + (if (null auto-revert-notify-watch-descriptor) + (setq-local auto-revert-use-notify nil) + (setq auto-revert-notify-modified-p t + auto-revert--buffer-by-watch-descriptor + (cons (cons auto-revert-notify-watch-descriptor (current-buffer)) + auto-revert--buffer-by-watch-descriptor)) + (add-hook 'kill-buffer-hook #'auto-revert-notify-rm-watch nil t)))) ;; If we have file notifications, we want to update the auto-revert buffers ;; immediately when a notification occurs. Since file updates can happen very -- 2.39.5