From c647adda60a089e11ec4ef2acd124f8c94b351e4 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Wed, 18 May 2005 10:19:31 +0000 Subject: [PATCH] Replace `send-string' by `process-send-string'; replace `send-region' by `process-send-region'. --- lisp/progmodes/prolog.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index 25bc337a7b2..73450dec61a 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el @@ -234,8 +234,8 @@ Entry to this mode calls the value of `prolog-mode-hook' with no arguments, if that value is non-nil. Likewise with the value of `comint-mode-hook'. `prolog-mode-hook' is called after `comint-mode-hook'. -You can send text to the inferior Prolog from other buffers -using the commands `send-region', `send-string' and \\[prolog-consult-region]. +You can send text to the inferior Prolog from other buffers using the commands +`process-send-region', `process-send-string' and \\[prolog-consult-region]. Commands: Tab indents for Prolog; with argument, shifts rest @@ -265,12 +265,12 @@ If COMPILE (prefix arg) is not nil, use compile mode rather than consult mode." (interactive "P\nr") (save-excursion (if compile - (send-string "prolog" prolog-compile-string) - (send-string "prolog" prolog-consult-string)) - (send-region "prolog" beg end) - (send-string "prolog" "\n") ;May be unnecessary + (process-send-string "prolog" prolog-compile-string) + (process-send-string "prolog" prolog-consult-string)) + (process-send-region "prolog" beg end) + (process-send-string "prolog" "\n") ;May be unnecessary (if prolog-eof-string - (send-string "prolog" prolog-eof-string) + (process-send-string "prolog" prolog-eof-string) (process-send-eof "prolog")))) ;Send eof to prolog process. (defun prolog-consult-region-and-go (compile beg end) -- 2.39.5