branch: elpa/helm
commit 8f6d86d44cbf68c3e3016afbddcaeb3fd5c17f32
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>

    Add helm-log entries and comment
---
 helm-core.el | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/helm-core.el b/helm-core.el
index afa7e47de0..324ec020f5 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -5542,9 +5542,16 @@ This will work only in Emacs-26+, i.e. Emacs versions 
that have
       (with-helm-buffer
         (save-excursion
           (if insertion-marker
-              (goto-char insertion-marker)
+              (prog1
+                  ;; Marker is alive, its position is constantly modified while
+                  ;; text is inserted.
+                  (goto-char insertion-marker)
+                (helm-log "helm-output-filter"
+                          "Goto insertion marker at %S" insertion-marker))
             (goto-char (point-max))
             (helm-insert-header-from-source source)
+            (helm-log "helm-output-filter"
+                      "Inserting source header name = %S" (assq 'name source))
             (setcdr process-assoc
                     (append source `((insertion-marker . ,(point-marker))))))
           ;; Split output and treat incomplete lines one by one.

Reply via email to