Mercurial > hg > xemacs-beta
diff src/abbrev.c @ 272:c5d627a313b1 r21-0b34
Import from CVS: tag r21-0b34
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:28:48 +0200 |
parents | 0e522484dd2a |
children | 7df0dd720c89 |
line wrap: on
line diff
--- a/src/abbrev.c Mon Aug 13 10:27:41 2007 +0200 +++ b/src/abbrev.c Mon Aug 13 10:28:48 2007 +0200 @@ -69,9 +69,7 @@ Lisp_Object Vlast_abbrev_text; /* Character address of start of last abbrev expanded */ -int last_abbrev_point; - -Lisp_Object oblookup (Lisp_Object, CONST Bufbyte *, Bytecount); +int last_abbrev_location; /* Hook to run before expanding any abbrev. */ Lisp_Object Vpre_abbrev_expand_hook, Qpre_abbrev_expand_hook; @@ -355,7 +353,7 @@ XSETSYMBOL (Vlast_abbrev, abbrev_symbol); Vlast_abbrev_text = make_string_from_buffer (buf, abbrev_start, abbrev_length); - last_abbrev_point = abbrev_start; + last_abbrev_location = abbrev_start; /* Add an undo boundary, in case we are doing this for a self-inserting command which has avoided making one so far. */ @@ -435,13 +433,13 @@ nil if the abbrev has already been unexpanded. */ ); - DEFVAR_INT ("last-abbrev-location", &last_abbrev_point /* + DEFVAR_INT ("last-abbrev-location", &last_abbrev_location /* The location of the start of the last abbrev expanded. */ ); Vlast_abbrev = Qnil; Vlast_abbrev_text = Qnil; - last_abbrev_point = 0; + last_abbrev_location = 0; DEFVAR_LISP ("abbrev-start-location", &Vabbrev_start_location /* Buffer position for `expand-abbrev' to use as the start of the abbrev.