Mercurial > hg > xemacs-beta

comparison src/abbrev.c @ 209:41ff10fd062f r20-4b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b3
author cvs
date Mon, 13 Aug 2007 10:04:58 +0200
parents 2d532a89d707
children 0e522484dd2a
comparison
equal deleted inserted replaced
208:f427b8ec4379 209:41ff10fd062f
177 if (!NILP (Vabbrev_start_location)) 177 if (!NILP (Vabbrev_start_location))
178 { 178 {
179 wordstart = get_buffer_pos_char (buf, Vabbrev_start_location, 179 wordstart = get_buffer_pos_char (buf, Vabbrev_start_location,
180 GB_COERCE_RANGE); 180 GB_COERCE_RANGE);
181 Vabbrev_start_location = Qnil; 181 Vabbrev_start_location = Qnil;
182 /*
183 * Previously, abbrev-prefix-mark inserted a dash to indicate the
184 * abbrev start point. It now uses an extent with a begin
185 * glyph so there's no dash to remove.
186 */
187 /*
182 if (wordstart != BUF_ZV (buf) 188 if (wordstart != BUF_ZV (buf)
183 && BUF_FETCH_CHAR (buf, wordstart) == '-') 189 && BUF_FETCH_CHAR (buf, wordstart) == '-')
184 { 190 {
185 buffer_delete_range (buf, wordstart, wordstart + 1, 0); 191 buffer_delete_range (buf, wordstart, wordstart + 1, 0);
186 } 192 }
193 */
187 wordend = BUF_PT (buf); 194 wordend = BUF_PT (buf);
188 } 195 }
189 else 196 else
190 { 197 {
191 Bufpos point = BUF_PT (buf); 198 Bufpos point = BUF_PT (buf);