* window.c (enlarge_window): In new preserve_before code, convert CURBEG from

lisp object to integer before doing arithmetic.

diff --git a/src/ChangeLog b/src/ChangeLog
index cba789f9aecee8b55fd54194cf53d0d6a436460c..03fc611590fd4a9c91527051539b1ebbeaa1fd90 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2001-12-27  Ken Raeburn  <raeburn@gnu.org>
+
+       * window.c (enlarge_window): In new preserve_before code, convert
+       CURBEG from lisp object to integer before doing arithmetic.
+
 2001-12-27  Richard M. Stallman  <rms@gnu.org>
 
        * bytecode.c (Fbyte_code): Undo previous change.

diff --git a/src/window.c b/src/window.c
index 35694084a9be42a0b5b317148f48efa2c27a82ff..0e5af1f079033e74b1dc0fcdc414e343b33c3977 100644 (file)
--- a/src/window.c
+++ b/src/window.c
@@ -3394,7 +3394,7 @@ enlarge_window (window, delta, widthflag, preserve_before)
          {
            maxdelta = (*sizefun) (parent) - XINT (*sizep);
            /* Subtract size of siblings before, since we can't take that.  */
-           maxdelta -= CURBEG (window) - CURBEG (parent);
+           maxdelta -= XINT (CURBEG (window)) - XINT (CURBEG (parent));
          }
        else
          maxdelta = (!NILP (p->next) ? ((*sizefun) (p->next)