mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-22 18:35:09 +00:00
(ielm-indent-line): Detect a "prompt" line by seeing if comint-bol
doesn't actually go to the beginning of the line.
This commit is contained in:
parent
01d8967d66
commit
3250010dd7
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user