mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-11 09:20:51 +00:00
Code Issues Releases Activity

Allow hooks to alter the process in prolog-ensure-process

Browse Source 
* 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).
This commit is contained in:
Lars Ingebrigtsen 2022-06-07 16:38:55 +02:00
parent a98413726f
commit 00a0226ba5
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/progmodes/prolog.el
View File

@ -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.