[elpa] externals/calibre 7a8ed52e86 51/76: Set revert-buffer-function instead of using revert hooks

[ELPA Syncer]

branch: externals/calibre
commit 7a8ed52e866adef3c6d258668a2a68aa3fa6fcbb
Author: Kjartan Óli Ágústsson <kjartanoli@disroot.org>
Commit: Kjartan Óli Ágústsson <kjartanoli@disroot.org>

    Set revert-buffer-function instead of using revert hooks
    
    * calibre-library.el (calibre-library--revert): Remove
    (calibre-library-revert): Add
    (calibre-library-mode): Set revert-buffer-function.
    Don't modify tabulated-list-revert-hook.
---
 calibre-library.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/calibre-library.el b/calibre-library.el
index 9c2c70660a..6167dcd11d 100644
--- a/calibre-library.el
+++ b/calibre-library.el
@@ -103,8 +103,7 @@ ARGS should be a list of strings.  SENTINEL is a process 
sentinel to install."
                            (calibre-book-id book))))
           (forward-line)))
 
-(defun calibre-library--revert ()
-  "Refresh the contents of the Library buffer without moving point."
+(defun calibre-library-revert (&rest _IGNORED)
   (let ((pos (tabulated-list-get-id)))
     (calibre-library--refresh t)
     (if (not pos)
@@ -135,8 +134,8 @@ ARGS should be a list of strings.  SENTINEL is a process 
sentinel to install."
 
 (define-derived-mode calibre-library-mode tabulated-list-mode
   (setf tabulated-list-padding 2)
-  (calibre-library--set-header)
-  (add-hook 'tabulated-list-revert-hook #'calibre-library--revert))
+  (setq-local revert-buffer-function #'calibre-library-revert)
+  (calibre-library--set-header))
 
 ;;;###autoload
 (defun calibre-library ()