1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-27 07:41:28 -08:00

(Fbeginning_of_line): Don't handle minibuffer prompt here.

This commit is contained in:
Richard M. Stallman 1999-09-11 01:12:39 +00:00
parent cdd9f64394
commit 0aee588ddc

View file

@ -163,13 +163,7 @@ If scan reaches end of buffer, stop there without error.")
else
CHECK_NUMBER (n, 0);
{
int pos = XFASTINT (Fline_beginning_position (n));
if (INTEGERP (current_buffer->minibuffer_prompt_length)
&& pos < XFASTINT (current_buffer->minibuffer_prompt_length))
pos = XFASTINT (current_buffer->minibuffer_prompt_length);
SET_PT (pos);
}
SET_PT (XINT (Fline_beginning_position (n)));
return Qnil;
}
@ -182,9 +176,6 @@ If scan reaches end of buffer, stop there without error.")
(n)
Lisp_Object n;
{
register int pos;
register int stop;
if (NILP (n))
XSETFASTINT (n, 1);
else