Mercurial > hg > xemacs-beta

diff src/cmds.c @ 272:c5d627a313b1 r21-0b34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents 8efd647ea9ca
children 6330739388db
line wrap: on
line diff
--- a/src/cmds.c	Mon Aug 13 10:27:41 2007 +0200
+++ b/src/cmds.c	Mon Aug 13 10:28:48 2007 +0200
@@ -420,9 +420,8 @@
   if (!NILP (Vself_insert_face)
       && EQ (Vlast_command, Vself_insert_face_command))
     {
-      Lisp_Object before, after;
-      XSETINT (before, BUF_PT (buf) - 1);
-      XSETINT (after, BUF_PT (buf));
+      Lisp_Object before = make_int (BUF_PT (buf) - 1);
+      Lisp_Object after  = make_int (BUF_PT (buf));
       Fput_text_property (before, after, Qface, Vself_insert_face, Qnil);
       Fput_text_property (before, after, Qstart_open, Qt, Qnil);
       Fput_text_property (before, after, Qend_open, Qnil, Qnil);