diff options
| author | Chunyang Xu <mail@xuchunyang.me> | 2017-05-22 14:11:31 +0800 |
|---|---|---|
| committer | Chunyang Xu <mail@xuchunyang.me> | 2017-05-22 14:13:07 +0800 |
| commit | d116526743adb39239c40d298ff2c271eaf6c204 (patch) | |
| tree | b5e96186b62659500ab037d585df7e04ac30b2bd /helm-command.el | |
| parent | 8c414cb227aaa67e4594f0e96d805c2bdabf4efe (diff) | |
* helm-command.el (helm-M-x): Re-throw error signal.
Diffstat (limited to 'helm-command.el')
| -rw-r--r-- | helm-command.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/helm-command.el b/helm-command.el index 8d16fde4..61cd8d86 100644 --- a/helm-command.el +++ b/helm-command.el @@ -285,12 +285,14 @@ You can get help on each command by persistent action." (cl-flet ((save-hist (command) (setq extended-command-history (cons command (delete command extended-command-history))))) - (condition-case nil + (condition-case err (progn (command-execute sym-com 'record) (save-hist command-name)) - (error (when helm-M-x-always-save-history - (save-hist command-name)))))))))) + (error + (when helm-M-x-always-save-history + (save-hist command-name)) + (signal (car err) (cdr err)))))))))) (put 'helm-M-x 'interactive-only 'command-execute) (provide 'helm-command) |