comparison src/cmds.c @ 2159:6a082f5ce7e6

(internal_self_insert): Check that tab_width does not exceed 20, to be consistent with indent.c and xdisp.c.
author Richard M. Stallman <rms@gnu.org>
date Fri, 12 Mar 1993 21:42:58 +0000
parents b1bc0b15ca7f
children e5928bec8d5d
comparison
equal deleted inserted replaced
2158:5c9e59f279aa 2159:6a082f5ce7e6
281 && point < ZV 281 && point < ZV
282 && (overwrite_binary_mode || (c != '\n' && FETCH_CHAR (point) != '\n')) 282 && (overwrite_binary_mode || (c != '\n' && FETCH_CHAR (point) != '\n'))
283 && (overwrite_binary_mode 283 && (overwrite_binary_mode
284 || FETCH_CHAR (point) != '\t' 284 || FETCH_CHAR (point) != '\t'
285 || XINT (current_buffer->tab_width) <= 0 285 || XINT (current_buffer->tab_width) <= 0
286 || XFASTINT (current_buffer->tab_width) > 20
286 || !((current_column () + 1) % XFASTINT (current_buffer->tab_width)))) 287 || !((current_column () + 1) % XFASTINT (current_buffer->tab_width))))
287 { 288 {
288 del_range (point, point + 1); 289 del_range (point, point + 1);
289 hairy = 1; 290 hairy = 1;
290 } 291 }