branch: externals/objed
commit dc23da4700a4e00bef2cbf0e0808800a5cc25a7b
Author: Clemens Radermacher <clem...@posteo.net>
Commit: Clemens Radermacher <clem...@posteo.net>
Add objed-exit-hook #57
---
objed.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/objed.el b/objed.el
index 3a1040c..6143587 100644
--- a/objed.el
+++ b/objed.el
@@ -190,6 +190,9 @@ The function should return nil if objed should not
initialize."
"Hook that runs after objed initialized."
:type 'hook)
+(defcustom objed-exit-hook '()
+ "Hook that runs when objed exits."
+ :type 'hook)
(defcustom objed-cmd-alist
'((left-char . char)
@@ -3939,7 +3942,8 @@ Reset and reinitilize objed if appropriate."
(if (consp setting)
(set (car setting) (cdr setting))
(kill-local-variable setting))))
- (remove-hook 'pre-command-hook 'objed--push-state t))))
+ (remove-hook 'pre-command-hook 'objed--push-state t)
+ (run-hooks 'objed-exit-hook))))
(defun objed--reset ()
"Reset variables and state information."
