branch: externals/shell-command+ commit 3fcab363380c39a60601077660c6a1252be3a748 Author: Philip K <phi...@warpmail.net> Commit: Philip K <phi...@warpmail.net>
only execute real command, not bang modifiers --- bang.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bang.el b/bang.el index 9160823..ff82c1c 100644 --- a/bang.el +++ b/bang.el @@ -101,7 +101,7 @@ between BEG and END. Otherwise the whole buffer is processed." (has-| (shell-command-on-region beg end rest t t shell-command-default-error-buffer t)) - (t (shell-command command (if current-prefix-arg t nil) + (t (shell-command rest (if current-prefix-arg t nil) shell-command-default-error-buffer)))) (when has-> (with-current-buffer "*Shell Command Output*"