emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/with-editor 63e60d5877: with-editor-export-editor: Wait lo


From: ELPA Syncer
Subject: [nongnu] elpa/with-editor 63e60d5877: with-editor-export-editor: Wait longer for terminal to get ready
Date: Thu, 22 Aug 2024 19:01:21 -0400 (EDT)

branch: elpa/with-editor
commit 63e60d5877c97b5c4205816ddd2ba53dde109317
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    with-editor-export-editor: Wait longer for terminal to get ready
    
    And ignore all other processes while waiting for output from that
    process.
    
    Closes #130.
---
 lisp/with-editor.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/with-editor.el b/lisp/with-editor.el
index 821da18e28..b96b9f3f2f 100644
--- a/lisp/with-editor.el
+++ b/lisp/with-editor.el
@@ -747,7 +747,7 @@ This works in `shell-mode', `term-mode', `eshell-mode' and
       (process-send-string
        process (format " export %s=%s\n" envvar
                        (shell-quote-argument with-editor-sleeping-editor)))
-      (while (accept-process-output process 0.1))
+      (while (accept-process-output process 1 nil t))
       (if (derived-mode-p 'term-mode)
           (with-editor-set-process-filter process 
#'with-editor-emulate-terminal)
         (add-hook 'comint-output-filter-functions #'with-editor-output-filter
@@ -763,7 +763,7 @@ This works in `shell-mode', `term-mode', `eshell-mode' and
         (let ((with-editor--envvar envvar)
               (process-environment process-environment))
           (with-editor--setup)
-          (while (accept-process-output vterm--process 0.1))
+          (while (accept-process-output vterm--process 1 nil t))
           (when-let ((v (getenv envvar)))
             (vterm-send-string (format " export %s=%S" envvar v))
             (vterm-send-return))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]