2 files changed, 6 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index cb0975d52bf..54e46245d30 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2002-03-13  Stefan Monnier  <monnier@cs.yale.edu>
+
+        * xdisp.c (display_mode_element): Fix int/Lisp_Object mixup.
+
 2002-03-13  Kim F. Storm  <storm@cua.dk>
 
         * puresize.h (BASE_PURESIZE): Increase to 775000.
diff --git a/src/xdisp.c b/src/xdisp.c
index 4760893d284..6ac581914a7 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -13640,7 +13640,8 @@ display_mode_element (it, depth, field_width, precision, elt, props)
                 else
                   {
                     elt = Fcopy_sequence (elt);
-                    Fset_text_properties (0, Flength (elt), props, elt);
+                    Fset_text_properties (make_number (0), Flength (elt),
+                                          props, elt);
                     mode_line_proptrans_alist
                       = Fcons (Fcons (elt, props),
                                mode_line_proptrans_alist);