branch: elpa/helm
commit 0221822de29fa297d7c67e0d27dddd936285300d
Author: AlexK <ambula...@gmail.com>
Commit: AlexK <ambula...@gmail.com>
"while-no-input" on/off by defvar "helm-update-edebug" for edebug.
---
helm-core.el | 14 ++++++--------
1 file changed, 6 insertions(+), 8 deletions(-)
diff --git a/helm-core.el b/helm-core.el
index 252c1f29cb..9f64e5e4a8 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -1122,14 +1122,6 @@ You can toggle later `truncate-lines' with
Set this to an empty string if you don't want prefix in margin when marking."
:group 'helm
:type 'string)
-
-(defcustom helm-update-edebug nil
- "Development feature.
-If set to true then all functions invoked after `helm-update' can be
instrumented by
-`edebug' for stepping. `helm--maybe-use-while-no-input' then doesn't use
`while-no-input',
-because `while-no-input' throws on `edebug' command key input."
- :group 'helm
- :type 'boolean)
;;; Faces
;;
@@ -4964,6 +4956,12 @@ Unlike `while-no-input' this macro ensure to not returns
`t'."
(quit-flag nil)
(t val)))))))
+(defvar helm-update-edebug nil
+ "Development feature.
+If set to true then all functions invoked after `helm-update' can be
instrumented by
+`edebug' for stepping. `helm--maybe-use-while-no-input' then doesn't use
`while-no-input',
+because `while-no-input' throws on `edebug' command key input.")
+
(defmacro helm--maybe-use-while-no-input (&rest body)
"Wrap BODY in `helm-while-no-input' unless initializing a remote connection."
`(progn
