master f5e7aaed66e 1/2: Fix: add comint hook locally in lua-ts-inferior-lua

[Eli Zaretskii]

branch: master
commit f5e7aaed66e807920f084b309e7595a2a6c9c216
Author: nverno <noah.v.peart@gmail.com>
Commit: Eli Zaretskii <eliz@gnu.org>

    Fix: add comint hook locally in lua-ts-inferior-lua
    
    * lisp/progmodes/lua-ts-mode.el (lua-ts-inferior-lua): Add
    'comint-preoutput-filter-functions' hook locally.  (Bug#67616)
---
 lisp/progmodes/lua-ts-mode.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/lisp/progmodes/lua-ts-mode.el b/lisp/progmodes/lua-ts-mode.el
index 7307a5b13f1..5318144a057 100644
--- a/lisp/progmodes/lua-ts-mode.el
+++ b/lisp/progmodes/lua-ts-mode.el
@@ -560,9 +560,7 @@ Calls REPORT-FN directly."
       (comint-read-input-ring t)
       (add-hook 'comint-preoutput-filter-functions
                 (lambda (string)
-                  (if (or (not (equal (buffer-name) lua-ts-inferior-buffer))
-                          (equal string
-                                 (concat lua-ts-inferior-prompt-continue " ")))
+                  (if (equal string (concat lua-ts-inferior-prompt-continue " 
"))
                       string
                     (concat
                      ;; Filter out the extra prompt characters that
@@ -576,7 +574,8 @@ Calls REPORT-FN directly."
                                                     (group (* nonl))))
                                                "\\1" string)
                      ;; Re-add the prompt for the next line.
-                     lua-ts-inferior-prompt " "))))))
+                     lua-ts-inferior-prompt " ")))
+                nil t)))
   (select-window (display-buffer lua-ts-inferior-buffer
                                  '((display-buffer-reuse-window
                                     display-buffer-pop-up-frame)