From 00a0226ba53598bbe71d12d877121fdcb194e2c9 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 7 Jun 2022 16:38:55 +0200 Subject: [PATCH] Allow hooks to alter the process in prolog-ensure-process * lisp/progmodes/prolog.el (prolog-ensure-process): Start the mode after starting the process, so that the mode hook can talk to the process (bug#46003). --- lisp/progmodes/prolog.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index 8382c4bd099..9598209f5e5 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el @@ -1355,8 +1355,6 @@ the variable `prolog-prompt-regexp'." (error "This Prolog system has defined no interpreter")) (unless (comint-check-proc "*prolog*") (with-current-buffer (get-buffer-create "*prolog*") - (prolog-inferior-mode) - ;; The "INFERIOR=yes" hack is for SWI-Prolog 7.2.3 and earlier, ;; which assumes it is running under Emacs if either INFERIOR=yes or ;; if EMACS is set to a nonempty value. The EMACS setting is @@ -1369,6 +1367,7 @@ the variable `prolog-prompt-regexp'." (cons "INFERIOR=yes" process-environment)))) (apply 'make-comint-in-buffer "prolog" (current-buffer) pname nil pswitches)) + (prolog-inferior-mode) (unless prolog-system ;; Setup auto-detection. -- 2.39.2