(Ftranspose_regions): Yet another int/Lisp_Object mixup (YAILOM)

diff --git a/src/ChangeLog b/src/ChangeLog
index 31115be1de9558d6e6d43da8f3485871de6e4f69..12d92626b3fa792166eb74ee9d4c1ce3e060332f 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2007-05-07  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * editfns.c (Ftranspose_regions): Yet another int/Lisp_Object mixup (YAILOM)
+
 2007-05-06  Richard Stallman  <rms@gnu.org>
 
        * process.c: Undo May 3 change.
@@ -65,8 +69,8 @@
 
 2007-04-16  Chong Yidong  <cyd@stupidchicken.com>
 
-       * dispnew.c (adjust_frame_glyphs_for_frame_redisplay): Set
-       garbaged flag in presence of window margins.
+       * dispnew.c (adjust_frame_glyphs_for_frame_redisplay):
+       Set garbaged flag in presence of window margins.
        (showing_window_margins_p): New function.
 
        * xdisp.c (cursor_row_p): Only end row on newline if it's a

diff --git a/src/editfns.c b/src/editfns.c
index 2ab852d2925b9ea0a765b32f71ae09b7d1643887..37498e3b6f771aedec6b930d8c5e6ecdfc59009f 100644 (file)
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -4393,8 +4393,7 @@ Transposing beyond buffer boundaries is an error.  */)
       fix_start_end_in_overlays (start1, end2);
     }
 
-  signal_after_change (XINT (start1), XINT (end2 - start1),
-                      XINT (end2 - start1));
+  signal_after_change (start1, end2 - start1, end2 - start1);
   return Qnil;
 }