diff src/intl.c @ 14:9ee227acff29 r19-15b90

Import from CVS: tag r19-15b90
author cvs
date Mon, 13 Aug 2007 08:48:42 +0200
parents 376386a54a3c
children 859a2309aef8
line wrap: on
line diff
--- a/src/intl.c	Mon Aug 13 08:48:18 2007 +0200
+++ b/src/intl.c	Mon Aug 13 08:48:42 2007 +0200
@@ -208,9 +208,9 @@
 
   if (STRINGP (string)) {
 #ifdef DEBUG_XEMACS
-    stderr_out ("\nFgettext (%s) called.\n", string_data (XSTRING (string)));
+    stderr_out ("\nFgettext (%s) called.\n", XSTRING_DATA (string));
 #endif
-    return build_string (gettext ((char *) string_data (XSTRING (string))));
+    return build_string (gettext ((char *) XSTRING_DATA (string)));
   } else {
     return string;
   }
@@ -238,8 +238,8 @@
   CHECK_STRING (domain);
   CHECK_STRING (string);
 #ifdef I18N3
-  return build_string (dgettext ((char *) string_data (XSTRING (domain)),
-				 (char *) string_data (XSTRING (string))));
+  return build_string (dgettext ((char *) XSTRING_DATA (domain),
+				 (char *) XSTRING_DATA (string)));
 #else
   return string;
 #endif
@@ -257,8 +257,8 @@
   CHECK_STRING (domain);
   CHECK_STRING (pathname);
 #ifdef I18N3
-  return build_string (bindtextdomain ((char *) string_data (XSTRING (domain)),
-				       (char *) string_data (XSTRING (pathname))));
+  return build_string (bindtextdomain ((char *) XSTRING_DATA (domain),
+				       (char *) XSTRING_DATA (pathname)));
 #else
   return Qnil;
 #endif