From 3250010dd7fbfc5d47c9ea6b22f3ebb87524c947 Mon Sep 17 00:00:00 2001
From: Miles Bader <miles@gnu.org>
Date: Mon, 7 Aug 2000 14:56:02 +0000
Subject: (ielm-indent-line): Detect a "prompt" line by seeing if comint-bol  
 doesn't actually go to the beginning of the line.

---
 lisp/ielm.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'lisp')

diff --git a/lisp/ielm.el b/lisp/ielm.el
index 2f2a9861e6c..a0973800271 100644
--- a/lisp/ielm.el
+++ b/lisp/ielm.el
@@ -179,9 +179,7 @@ This variable is buffer-local.")
      
 (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
-- 
cgit v1.2.1