aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1999-09-11 01:12:39 +0000
committerRichard M. Stallman1999-09-11 01:12:39 +0000
commit0aee588ddc19a0bbaa3ce094986b4f6a2706a243 (patch)
treed210ccae9b6fc7e389a25319e5ef9a562caa2df2
parentcdd9f64394f26d60c2c0ffe99719f8df9586ed80 (diff)
downloademacs-0aee588ddc19a0bbaa3ce094986b4f6a2706a243.tar.gz
emacs-0aee588ddc19a0bbaa3ce094986b4f6a2706a243.zip
(Fbeginning_of_line): Don't handle minibuffer prompt here.
-rw-r--r--src/cmds.c11
1 files changed, 1 insertions, 10 deletions
diff --git a/src/cmds.c b/src/cmds.c
index 64e7eaca4f2..3e688afa995 100644
--- a/src/cmds.c
+++ b/src/cmds.c
@@ -163,13 +163,7 @@ If scan reaches end of buffer, stop there without error.")
163 else 163 else
164 CHECK_NUMBER (n, 0); 164 CHECK_NUMBER (n, 0);
165 165
166 { 166 SET_PT (XINT (Fline_beginning_position (n)));
167 int pos = XFASTINT (Fline_beginning_position (n));
168 if (INTEGERP (current_buffer->minibuffer_prompt_length)
169 && pos < XFASTINT (current_buffer->minibuffer_prompt_length))
170 pos = XFASTINT (current_buffer->minibuffer_prompt_length);
171 SET_PT (pos);
172 }
173 167
174 return Qnil; 168 return Qnil;
175} 169}
@@ -182,9 +176,6 @@ If scan reaches end of buffer, stop there without error.")
182 (n) 176 (n)
183 Lisp_Object n; 177 Lisp_Object n;
184{ 178{
185 register int pos;
186 register int stop;
187
188 if (NILP (n)) 179 if (NILP (n))
189 XSETFASTINT (n, 1); 180 XSETFASTINT (n, 1);
190 else 181 else