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

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

[nongnu] elpa/with-editor 5a1af9b 1/3: with-editor-output-filter: Move d


From: ELPA Syncer
Subject: [nongnu] elpa/with-editor 5a1af9b 1/3: with-editor-output-filter: Move definition
Date: Thu, 28 Oct 2021 17:58:03 -0400 (EDT)

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

    with-editor-output-filter: Move definition
---
 with-editor.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/with-editor.el b/with-editor.el
index ba856e6..2aa8fc9 100644
--- a/with-editor.el
+++ b/with-editor.el
@@ -644,9 +644,6 @@ may not insert the text into the PROCESS's buffer.  Then it 
calls
 (defconst with-editor-sleeping-editor-regexp
   "^WITH-EDITOR: \\([0-9]+\\) OPEN \\([^]+?\\)\\(?: IN 
\\([^\r]+?\\)\\)?\r?$")
 
-(defun with-editor-output-filter (string)
-  (with-editor-sleeping-editor-filter nil string))
-
 (defun with-editor-sleeping-editor-filter (process string)
   (when-let ((incomplete (and process (process-get process 'incomplete))))
     (setq string (concat incomplete string)))
@@ -754,6 +751,10 @@ This works in `shell-mode', `term-mode', `eshell-mode' and
   (interactive)
   (with-editor-export-editor "HG_EDITOR"))
 
+(defun with-editor-output-filter (string)
+  "Handle edit requests on behalf of `comint-mode' and `eshell-mode'."
+  (with-editor-sleeping-editor-filter nil string))
+
 (defun with-editor-emulate-terminal (process string)
   "Like `term-emulate-terminal' but also handle edit requests."
   (when (with-editor-sleeping-editor-filter process string)



reply via email to

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