* bs.el (bs-mode): Set `revert-buffer-function' to `bs-refresh'.

  (bs-refresh): Add IGNORED arg for `revert-buffer' compatibility.  Doc fix.

1 files changed, 5 insertions, 3 deletions

diff --git a/lisp/bs.el b/lisp/bs.el
index 54924196bf0..e7febbdb119 100644
--- a/lisp/bs.el
+++ b/lisp/bs.el
@@ -664,7 +664,8 @@ to show always.
         show-trailing-whitespace nil
         font-lock-global-modes '(not bs-mode)
         font-lock-defaults '(bs-mode-font-lock-keywords t)
-        font-lock-verbose nil)
+        font-lock-verbose nil
+        revert-buffer-function 'bs-refresh)
   (add-hook 'window-size-change-functions 'bs--track-window-changes)
   (add-hook 'kill-buffer-hook 'bs--remove-hooks nil t)
   (add-hook 'change-major-mode-hook 'bs--remove-hooks nil t))
@@ -697,8 +698,9 @@ Refresh whole Buffer Selection Menu."
   (call-interactively 'bs-set-configuration)
   (bs--redisplay t))
 
-(defun bs-refresh ()
-  "Refresh whole Buffer Selection Menu."
+(defun bs-refresh (&rest ignored)
+  "Refresh whole Buffer Selection Menu.
+Arguments are IGNORED (for `revert-buffer')."
   (interactive)
   (bs--redisplay t))