(get_it_property): Move out of HAVE_WINDOW_SYSTEM

section.

diff --git a/src/ChangeLog b/src/ChangeLog
index 58b2538093be40c783fb8e4078c9f11d3678e8cb..c04d96629e35faa6069cdbd96701119ec3682c64 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2008-07-05  Andreas Schwab  <schwab@suse.de>
+
+       * xdisp.c (get_it_property): Move out of HAVE_WINDOW_SYSTEM
+       section.
+
 2008-07-05  Chong Yidong  <cyd@stupidchicken.com>
 
        * xdisp.c (IT_OVERFLOW_NEWLINE_INTO_FRINGE): Turn it off if

diff --git a/src/xdisp.c b/src/xdisp.c
index 28a5c4e0c0ae2c92d9ed4c6d13871b5235d96a1e..4b4fd77d280236e28420bd9b22904b754c0e696a 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -16386,6 +16386,25 @@ push_display_prop (struct it *it, Lisp_Object prop)
     }
 }
 
+/* Return the character-property PROP at the current position in IT.  */
+
+static Lisp_Object
+get_it_property (it, prop)
+     struct it *it;
+     Lisp_Object prop;
+{
+  Lisp_Object position;
+
+  if (STRINGP (it->object))
+    position = make_number (IT_STRING_CHARPOS (*it));
+  else if (BUFFERP (it->object))
+    position = make_number (IT_CHARPOS (*it));
+  else
+    return Qnil;
+
+  return Fget_char_property (position, prop, it->object);
+}
+
 /* See if there's a line- or wrap-prefix, and if so, push it on IT.  */
 
 static void
@@ -20879,25 +20898,6 @@ produce_stretch_glyph (it)
   take_vertical_position_into_account (it);
 }
 
-/* Return the character-property PROP at the current position in IT.  */
-
-static Lisp_Object
-get_it_property (it, prop)
-     struct it *it;
-     Lisp_Object prop;
-{
-  Lisp_Object position;
-
-  if (STRINGP (it->object))
-    position = make_number (IT_STRING_CHARPOS (*it));
-  else if (BUFFERP (it->object))
-    position = make_number (IT_CHARPOS (*it));
-  else
-    return Qnil;
-
-  return Fget_char_property (position, prop, it->object);
-}
-
 /* Calculate line-height and line-spacing properties.
    An integer value specifies explicit pixel value.
    A float value specifies relative value to current face height.