summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2000-08-07 14:56:02 +0000
committerMiles Bader <miles@gnu.org>2000-08-07 14:56:02 +0000
commit3250010dd7fbfc5d47c9ea6b22f3ebb87524c947 (patch)
tree3815f143e0d44bf66d034737c71adef444c9cb23 /lisp
parent01d8967d6612532a830089e4254e43f2fe208622 (diff)
downloademacs-3250010dd7fbfc5d47c9ea6b22f3ebb87524c947.tar.gz
(ielm-indent-line): Detect a "prompt" line by seeing if comint-bol
doesn't actually go to the beginning of the line.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ielm.el4
1 files changed, 1 insertions, 3 deletions
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