branch: elpa/sesman
commit e3adc450afad2ecc3750e7e72659f2694dc96e9f
Author: Vitalie Spinu <spinu...@gmail.com>
Commit: Vitalie Spinu <spinu...@gmail.com>
Run hooks in sesman-unlink
---
sesman.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/sesman.el b/sesman.el
index c42b666c37..b289faa418 100644
--- a/sesman.el
+++ b/sesman.el
@@ -423,10 +423,11 @@ PROJECT defaults to current project. On universal
argument, or if PROJECT is
"Break any of the previously created links."
(interactive)
(let* ((system (sesman--system))
- (links (or (sesman-current-links system)
+ (links (or (sesman-current-links system session)
(user-error "No %s links found" system))))
(mapc #'sesman--unlink
- (sesman--ask-for-link "Unlink: " links 'ask-all))))
+ (sesman--ask-for-link "Unlink: " links 'ask-all)))
+ (run-hooks 'sesman-post-command-hook))
(defvar sesman-map
(let (sesman-map)
