# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 965660162 0
# Node ID ce7385745191cc0b644b7eb495c9860c17bd96f7
# Parent  4a6ff467897eb14a911a2bb21739a41b79814ee6
(ielm-indent-line): Detect a "prompt" line by seeing if comint-bol
  doesn't actually go to the beginning of the line.

diff -r 4a6ff467897e -r ce7385745191 lisp/ielm.el
--- a/lisp/ielm.el	Mon Aug 07 14:54:35 2000 +0000
+++ b/lisp/ielm.el	Mon Aug 07 14:56:02 2000 +0000
@@ -179,9 +179,7 @@
      
 (defun ielm-indent-line nil
   "Indent the current line as Lisp code if it is not a prompt line."
-  (if (save-excursion
-	(beginning-of-line)
-	(looking-at comint-prompt-regexp)) nil
+  (when (save-excursion (comint-bol) (bolp))
     (lisp-indent-line)))
 
 ;;; Working buffer manipulation