comparison src/insdel.c @ 151:59463afc5666 r20-3b2

Import from CVS: tag r20-3b2
author cvs
date Mon, 13 Aug 2007 09:37:19 +0200
parents 538048ae2ab8
children 85ec50267440
comparison
equal deleted inserted replaced
150:8ebb1c0f0f6f 151:59463afc5666
2116 static void 2116 static void
2117 signal_first_change (struct buffer *buf) 2117 signal_first_change (struct buffer *buf)
2118 { 2118 {
2119 /* This function can GC */ 2119 /* This function can GC */
2120 Lisp_Object buffer; 2120 Lisp_Object buffer;
2121 XSETBUFFER (buffer, buf); 2121 XSETBUFFER (buffer, current_buffer);
2122 2122
2123 if (!in_first_change) 2123 if (!in_first_change)
2124 { 2124 {
2125 if (!preparing_for_armageddon && 2125 if (!preparing_for_armageddon &&
2126 !NILP (symbol_value_in_buffer (Qfirst_change_hook, buffer))) 2126 !NILP (symbol_value_in_buffer (Qfirst_change_hook, buffer)))