branch: externals/shell-command+
commit 93503930c1b73b270b924314d88ddc1fba2c605e
Author: Philip K <phi...@warpmail.net>
Commit: Philip K <phi...@warpmail.net>
fixed critical bug when no path was specified
---
bang.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/bang.el b/bang.el
index 57cfe4d..9160823 100644
--- a/bang.el
+++ b/bang.el
@@ -91,7 +91,7 @@ between BEG and END. Otherwise the whole buffer is processed."
(match-string-no-properties 5 command)
nil nil 1)
(error (match-string-no-properties 5 command)))))
- (let ((default-directory (bang-expand-path path)))
+ (let ((default-directory (bang-expand-path (or path "."))))
(cond (has-< (delete-region beg end)
(shell-command rest t shell-command-default-error-buffer)
(exchange-point-and-mark))
