branch: elpa/helm
commit a2be0a0e3bd936de3e734ffbd578d964d7a522d3
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Use with-helm-alive-p for helm-only commands and add missing prop
---
helm-core.el | 14 ++++++++------
1 file changed, 8 insertions(+), 6 deletions(-)
diff --git a/helm-core.el b/helm-core.el
index 43e63134af..ddc175584e 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -6338,12 +6338,14 @@ delete minibuffer contents from point instead of
deleting all.
With a prefix arg reverse this behaviour. When at the end of
minibuffer, delete all."
(interactive "P")
- (let ((str (if helm-delete-minibuffer-contents-from-point
- (if (or arg (eobp))
- "" (helm-minibuffer-completion-contents))
- (if (and arg (not (eobp)))
- (helm-minibuffer-completion-contents) ""))))
- (helm--delete-minibuffer-contents-from str)))
+ (with-helm-alive-p
+ (let ((str (if helm-delete-minibuffer-contents-from-point
+ (if (or arg (eobp))
+ "" (helm-minibuffer-completion-contents))
+ (if (and arg (not (eobp)))
+ (helm-minibuffer-completion-contents) ""))))
+ (helm--delete-minibuffer-contents-from str))))
+(put 'helm-delete-minibuffer-contents 'no-helm-mx t)
;;; helm-source-in-buffer.
