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
commitd642b7d1aab47bcd9208d40b080aef8cf2518126 (patch)
tree6e865d258c11edf6eaeef4eb6ca82a6e83664b71 /lisp
parenta468d904e3f41b8f5ec73b461e8ec9a04e0eb0c0 (diff)
downloademacs-d642b7d1aab47bcd9208d40b080aef8cf2518126.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