From a354925d561725b1df310ca036519c26fb7f081a Mon Sep 17 00:00:00 2001 From: nverno Date: Sun, 3 Dec 2023 19:21:04 -0800 Subject: [PATCH] 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 @@ lua-ts-inferior-lua (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 @@ lua-ts-inferior-lua (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) -- 2.41.0