Mercurial > emacs

changeset 30644:ce7385745191

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ielm-indent-line): Detect a "prompt" line by seeing if comint-bol doesn't actually go to the beginning of the line.
author Miles Bader <miles@gnu.org>
date Mon, 07 Aug 2000 14:56:02 +0000
parents 4a6ff467897e
children 4706d5e24141
files lisp/ielm.el
diffstat 1 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- 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