branch: elpa/helm commit 8946fa185d9838b6c2f3efdd0161861fddaf149c Author: Thierry Volpiatto <thie...@posteo.net> Commit: Thierry Volpiatto <thie...@posteo.net>
Add comments --- helm-core.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/helm-core.el b/helm-core.el index a53b0798e4..7e3dfc75d0 100644 --- a/helm-core.el +++ b/helm-core.el @@ -5540,9 +5540,13 @@ This will work only in Emacs-26+, i.e. Emacs versions that have (goto-char (point-max)) (helm-insert-header-from-source source) (process-put proc 'insertion-marker (point-marker))) - ;; This method for handling incomplete lines should fix as well Bug#1187. + ;; This method for handling incomplete lines should fix as well + ;; Bug#1187. When previous output was e.g. "foo\nba" incomplete-line is + ;; "ba", now when next output comes with r\nzo we complete the + ;; incomplete line by concating the saved text: (concat "ba" "r\nzo") => + ;; "bar\nzo" and so on... (setq output (concat (process-get proc 'incomplete-line) output)) - (let ((end (string-match ".*\\'" output))) + (let ((end (string-match ".*\\'" output))) ; Match up to \n. (process-put proc 'incomplete-line (substring output end)) ;; output should now have only wholelines. (setq output (substring output 0 end)))