Mercurial > emacs
comparison src/minibuf.c @ 41066:f61bc276fe98
(Fminibuffer_prompt_end): Update args to Ffield_end.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 15 Nov 2001 08:06:06 +0000 |
parents | d9b11436ac12 |
children | e08cd63afb2e |
comparison
equal
deleted
inserted
replaced
41065:af0215d05281 | 41066:f61bc276fe98 |
---|---|
330 Return (point-min) if current buffer is not a mini-buffer. */) | 330 Return (point-min) if current buffer is not a mini-buffer. */) |
331 () | 331 () |
332 { | 332 { |
333 /* This function is written to be most efficient when there's a prompt. */ | 333 /* This function is written to be most efficient when there's a prompt. */ |
334 Lisp_Object beg = make_number (BEGV); | 334 Lisp_Object beg = make_number (BEGV); |
335 Lisp_Object end = Ffield_end (beg, Qnil); | 335 Lisp_Object end = Ffield_end (beg, Qnil, Qnil); |
336 | 336 |
337 if (XINT (end) == ZV && NILP (Fget_char_property (beg, Qfield, Qnil))) | 337 if (XINT (end) == ZV && NILP (Fget_char_property (beg, Qfield, Qnil))) |
338 return beg; | 338 return beg; |
339 else | 339 else |
340 return end; | 340 return end; |