procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* comint.el (comint-get-old-input-default): Fix thinko in last change.

Browse source 
Fixes: debbugs:9865
This commit is contained in:
Stefan Monnier 2011-10-25 08:33:31 -04:00
parent d53e174785
commit 81a0a2681d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/comint.el
View file

@ -2152,7 +2152,7 @@ If `comint-use-prompt-regexp' is non-nil, then return
the current line with any initial string matching the regexp
`comint-prompt-regexp' removed."
(let (bof)
(if (and comint-use-prompt-regexp
(if (and (not comint-use-prompt-regexp)
;; Make sure we're in an input rather than output field.
(null (get-char-property (setq bof (field-beginning)) 'field)))
(field-string-no-properties bof)