the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
-#include "config.h"
+#include <config.h>
#include "lisp.h"
#include "commands.h"
#include "buffer.h"
}
negp = count <= 0;
- pos = scan_buffer ('\n', pos2, count - negp, &shortage);
+ pos = scan_buffer ('\n', pos2, count - negp, &shortage, 1);
if (shortage > 0
&& (negp
|| (ZV > BEGV
features all do nothing in that case. */
flag = point > BEGV && FETCH_CHAR (point - 1) == '\n';
+#ifdef USE_TEXT_PROPERTIES
+ /* We cannot use this optimization if properties change
+ in the vicinity.
+ ??? We need to check for change hook properties, etc. */
+ if (flag)
+ if (! (point - 1 > BEGV && ! property_change_between_p (point - 2, point)))
+ flag = 0;
+#endif
+
if (flag)
SET_PT (point - 1);
Lisp_Object tem;
register enum syntaxcode synt;
register int c = c1;
- Lisp_Object overwrite = current_buffer->overwrite_mode;
+ Lisp_Object overwrite;
+ overwrite = current_buffer->overwrite_mode;
if (!NILP (Vbefore_change_function) || !NILP (Vafter_change_function))
hairy = 1;
initial_define_key (global_map, Ctl('I'), "self-insert-command");
for (n = 040; n < 0177; n++)
initial_define_key (global_map, n, "self-insert-command");
- for (n = 0240; n < 0377; n++)
+#ifdef MSDOS
+ for (n = 0200; n < 0240; n++)
+ initial_define_key (global_map, n, "self-insert-command");
+#endif
+ for (n = 0240; n < 0400; n++)
initial_define_key (global_map, n, "self-insert-command");
initial_define_key (global_map, Ctl ('A'), "beginning-of-line");