mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 18:40:39 -08:00
Code Issues Projects Releases Wiki Activity

(try-expand-line, try-expand-line-all-buffers):

Browse source 
`comint-use-prompt-regexp-instead-of-fields' has been renamed to
`comint-use-prompt-regexp'.
This commit is contained in:
Luc Teirlinck 2005-04-26 23:13:46 +00:00
parent 03a610f742
commit d7210472aa
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/hippie-exp.el
View file

@ -634,7 +634,7 @@ for subsequent calls (for further possible completions of the same
string). It returns t if a new completion is found, nil otherwise."
(let ((expansion ())
(strip-prompt (and (get-buffer-process (current-buffer))
comint-use-prompt-regexp-instead-of-fields
comint-use-prompt-regexp
comint-prompt-regexp)))
(if (not old)
(progn
@ -681,7 +681,7 @@ for subsequent calls (for further possible completions of the same
string). It returns t if a new completion is found, nil otherwise."
(let ((expansion ())
(strip-prompt (and (get-buffer-process (current-buffer))
comint-use-prompt-regexp-instead-of-fields
comint-use-prompt-regexp
comint-prompt-regexp))
(buf (current-buffer))
(orig-case-fold-search case-fold-search))
@ -708,7 +708,7 @@ string). It returns t if a new completion is found, nil otherwise."
(widen))
(goto-char he-search-loc)
(setq strip-prompt (and (get-buffer-process (current-buffer))
comint-use-prompt-regexp-instead-of-fields
comint-use-prompt-regexp
comint-prompt-regexp))
(setq expansion
(let ((case-fold-search orig-case-fold-search))