(display_mode_element): Fix int/Lisp_Object mixup.

diff --git a/src/ChangeLog b/src/ChangeLog
index cb0975d52bfc0ce54b54aa01dba6e5827fc0d7be..54e46245d3045af6e4220daac27d80d5896e4ab4 100644 (file)
--- 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 4760893d2848968641fbdf5c55694036294e7b5f..6ac581914a7f3cbee3692fc86b14d99927ad4249 100644 (file)
--- 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);