comparison src/cmds.c @ 29378:141820271eff

(internal_self_insert): Don't check Vbefore_change_function, Vafter_change_function.
author Dave Love <fx@gnu.org>
date Fri, 02 Jun 2000 12:42:20 +0000
parents 48cb03c9d1d8
children af049ea731e5
comparison
equal deleted inserted replaced
29377:b614192b22ce 29378:141820271eff
115 Lisp_Object n; 115 Lisp_Object n;
116 { 116 {
117 int opoint = PT, opoint_byte = PT_BYTE; 117 int opoint = PT, opoint_byte = PT_BYTE;
118 int pos, pos_byte; 118 int pos, pos_byte;
119 int count, shortage; 119 int count, shortage;
120 int temp;
121 120
122 if (NILP (n)) 121 if (NILP (n))
123 count = 1; 122 count = 1;
124 else 123 else
125 { 124 {
347 unsigned char str[MAX_MULTIBYTE_LENGTH]; 346 unsigned char str[MAX_MULTIBYTE_LENGTH];
348 int chars_to_delete = 0; 347 int chars_to_delete = 0;
349 int spaces_to_insert = 0; 348 int spaces_to_insert = 0;
350 349
351 overwrite = current_buffer->overwrite_mode; 350 overwrite = current_buffer->overwrite_mode;
352 if (!NILP (Vbefore_change_function) || !NILP (Vafter_change_function) 351 if (!NILP (Vbefore_change_functions) || !NILP (Vafter_change_functions))
353 || !NILP (Vbefore_change_functions) || !NILP (Vafter_change_functions))
354 hairy = 1; 352 hairy = 1;
355 353
356 /* At first, get multi-byte form of C in STR. */ 354 /* At first, get multi-byte form of C in STR. */
357 if (!NILP (current_buffer->enable_multibyte_characters)) 355 if (!NILP (current_buffer->enable_multibyte_characters))
358 { 356 {