comparison src/syntax.c @ 25401:3f78f1fed4e0

(Fforward_word): If in a mini-buffer and moving backwards, stop in front of the prompt to prevent accidentially moving into the read-only prompt.

25400:c75839c09c84

  if (!(val = scan_words (PT, XINT (count))))
    {
      SET_PT (XINT (count) > 0 ? ZV : BEGV);
      return Qnil;
    }
  SET_PT (val);
  return Qt;
}

Lisp_Object skip_chars ();

25401:3f78f1fed4e0

  if (!(val = scan_words (PT, XINT (count))))
    {
      SET_PT (XINT (count) > 0 ? ZV : BEGV);
      return Qnil;
    }

  /* If in a mini-buffer and moving backwards, stop in front of the
     prompt if we are currently in front of it.  This prevents
     accidentially moving into the read-only prompt.  */
  if (INTEGERP (current_buffer->minibuffer_prompt_length))
    {
      int prompt_end = XFASTINT (current_buffer->minibuffer_prompt_length);
      if (PT > prompt_end && val < prompt_end)
	val = prompt_end;
    }
  
  SET_PT (val);
  return Qt;
}

Lisp_Object skip_chars ();