[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/inspector 4d58a95ad9 1/3: Revert buffer function hook
From: |
ELPA Syncer |
Subject: |
[elpa] externals/inspector 4d58a95ad9 1/3: Revert buffer function hook |
Date: |
Fri, 10 Mar 2023 20:58:32 -0500 (EST) |
branch: externals/inspector
commit 4d58a95ad9d8c6093d5daffd324aa9331fdb1430
Author: Mariano Montone <marianomontone@gmail.com>
Commit: Mariano Montone <marianomontone@gmail.com>
Revert buffer function hook
---
inspector.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/inspector.el b/inspector.el
index 6827638c30..54fb7ddd9a 100644
--- a/inspector.el
+++ b/inspector.el
@@ -5,7 +5,7 @@
;; Author: Mariano Montone <marianomontone@gmail.com>
;; URL: https://github.com/mmontone/emacs-inspector
;; Keywords: debugging, tool, lisp, development
-;; Version: 0.24
+;; Version: 0.25
;; Package-Requires: ((emacs "27.1"))
;; This program is free software; you can redistribute it and/or modify
@@ -732,6 +732,7 @@ is expected to be used.")
(make-local-variable '*))
buf))))
(with-current-buffer buffer
+ (setq revert-buffer-function #'inspector--revert-buffer)
(setq buffer-read-only nil)
(erase-buffer))
buffer))
@@ -780,6 +781,10 @@ When PRESERVE-HISTORY is T, inspector history is not
cleared."
(erase-buffer)
(inspector--basic-inspect inspector-inspected-object)))))
+(defun inspector--revert-buffer (&rest _ignore)
+ "Function bound to `revert-buffer-function'."
+ (inspector-refresh))
+
(defun inspector-quit ()
"Quit the Emacs inspector."
(interactive)