# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1033077402 0
# Node ID 9e91beee44a65aa0cf7fb0da55857c6b3ce4e27c
# Parent  8a11d295c3f324a252ffea9cfa18934580658e0c
(inferior-emacs-lisp-mode): Treat the header as output,
if comint-use-prompt-regexp-instead-of-fields is nil.

diff -r 8a11d295c3f3 -r 9e91beee44a6 lisp/ielm.el
--- a/lisp/ielm.el	Thu Sep 26 20:37:46 2002 +0000
+++ b/lisp/ielm.el	Thu Sep 26 21:56:42 2002 +0000
@@ -510,6 +510,10 @@
     ;; Add a silly header
     (insert ielm-header)
     (ielm-set-pm (point-max))
+    (unless comint-use-prompt-regexp-instead-of-fields
+      (add-text-properties
+       1 (point-max)
+       '(rear-nonsticky t field output inhibit-line-move-field-capture t)))
     (comint-output-filter (ielm-process) ielm-prompt)
     (set-marker comint-last-input-start (ielm-pm))
     (set-process-filter (get-buffer-process (current-buffer)) 'comint-output-filter))