Use tqtinterface-provided values for DCOP text types

This resolves Bug 994

1 files changed, 28 insertions, 28 deletions

diff --git a/dcop/client/marshall.cpp b/dcop/client/marshall.cpp
index c78a1569d..0df014f75 100644
--- a/dcop/client/marshall.cpp
+++ b/dcop/client/marshall.cpp
@@ -145,31 +145,31 @@ TQCString demarshal( TQDataStream &stream, const TQString &type )
         bool b;
         stream >> b;
         result = b ? "true" : "false";
-    } else if ( type == "TQString" )
+    } else if ( type == TQSTRING_OBJECT_NAME_STRING )
     {
         TQString s;
         stream >> s;
         result = s.local8Bit();
-    } else if ( type == "TQCString" )
+    } else if ( type == TQCSTRING_OBJECT_NAME_STRING )
     {
         stream >> result;
     } else if ( type == "QCStringList" )
     {
-        return demarshal( stream, "TQValueList<TQCString>" );
-    } else if ( type == "TQStringList" )
+        return demarshal( stream, TQVALUELIST_OBJECT_NAME_STRING "<" TQCSTRING_OBJECT_NAME_STRING ">" );
+    } else if ( type == TQSTRINGLIST_OBJECT_NAME_STRING )
     {
-        return demarshal( stream, "TQValueList<TQString>" );
-    } else if ( type == "TQColor" )
+        return demarshal( stream, TQVALUELIST_OBJECT_NAME_STRING "<" TQCSTRING_OBJECT_NAME_STRING ">" );
+    } else if ( type == TQCOLOR_OBJECT_NAME_STRING )
     {
         TQColor c;
         stream >> c;
         result = TQString(c.name()).local8Bit();
-    } else if ( type == "TQSize" )
+    } else if ( type == TQSIZE_OBJECT_NAME_STRING )
     {
         TQSize s;
         stream >> s;
         result.sprintf( "%dx%d", s.width(), s.height() );
-    } else if ( type == "TQPixmap" || type == "TQImage" )
+    } else if ( type == TQPIXMAP_OBJECT_NAME_STRING || type == TQIMAGE_OBJECT_NAME_STRING )
     {
         TQImage i;
         stream >> i;
@@ -178,17 +178,17 @@ TQCString demarshal( TQDataStream &stream, const TQString &type )
         buf.open( IO_WriteOnly );
         i.save( &buf, "XPM" );
         result = buf.buffer();
-    } else if ( type == "TQPoint" )
+    } else if ( type == TQPOINT_OBJECT_NAME_STRING )
     {
         TQPoint p;
         stream >> p;
         result.sprintf( "+%d+%d", p.x(), p.y() );
-    } else if ( type == "TQRect" )
+    } else if ( type == TQRECT_OBJECT_NAME_STRING )
     {
         TQRect r;
         stream >> r;
         result.sprintf( "%dx%d+%d+%d", r.width(), r.height(), r.x(), r.y() );
-    } else if ( type == "TQVariant" )
+    } else if ( type == TQVARIANT_OBJECT_NAME_STRING )
     {
         TQ_INT32 type;
         stream >> type;
@@ -203,7 +203,7 @@ TQCString demarshal( TQDataStream &stream, const TQString &type )
         KURL r;
         stream >> r;
         result = r.url().local8Bit();
-    } else if ( type.left( 11 ) == "TQValueList<" )
+    } else if ( type.left( 11 ) == TQVALUELIST_OBJECT_NAME_STRING "<" )
     {
         if ( (uint)type.find( '>', 11 ) != type.length() - 1 )
             return result;
@@ -225,7 +225,7 @@ TQCString demarshal( TQDataStream &stream, const TQString &type )
             if ( i < count - 1 )
                 result += '\n';
         }
-    } else if ( type.left( 5 ) == "TQMap<" )
+    } else if ( type.left( 5 ) == TQMAP_OBJECT_NAME_STRING "<" )
     {
         int commaPos = type.find( ',', 5 );
 
@@ -278,10 +278,10 @@ void marshall( TQDataStream &arg, QCStringList args, uint &i, TQString type )
     }
     TQString s = TQString::fromLocal8Bit( args[ i ] );
 
-    if (type == "TQStringList")
-       type = "TQValueList<TQString>";
+    if (type == TQSTRINGLIST_OBJECT_NAME_STRING)
+       type = TQVALUELIST_OBJECT_NAME_STRING "<" TQSTRING_OBJECT_NAME_STRING ">";
     if (type == "QCStringList")
-       type = "TQValueList<TQCString>";
+       type = TQVALUELIST_OBJECT_NAME_STRING "<" TQSTRING_OBJECT_NAME_STRING ">";
 
     if ( type == "int" )
 	arg << s.toInt();
@@ -317,36 +317,36 @@ void marshall( TQDataStream &arg, QCStringList args, uint &i, TQString type )
 	arg << s.toDouble();
     else if ( type == "bool" )
 	arg << mkBool( s );
-    else if ( type == "TQString" )
+    else if ( type == TQSTRING_OBJECT_NAME_STRING )
 	arg << s;
-    else if ( type == "TQCString" )
+    else if ( type == TQCSTRING_OBJECT_NAME_STRING )
 	arg << TQCString( args[ i ] );
-    else if ( type == "TQColor" )
+    else if ( type == TQCOLOR_OBJECT_NAME_STRING )
 	arg << mkColor( s );
-    else if ( type == "TQPoint" )
+    else if ( type == TQPOINT_OBJECT_NAME_STRING )
 	arg << mkPoint( s );
-    else if ( type == "TQSize" )
+    else if ( type == TQSIZE_OBJECT_NAME_STRING )
 	arg << mkSize( s );
-    else if ( type == "TQRect" )
+    else if ( type == TQRECT_OBJECT_NAME_STRING )
 	arg << mkRect( s );
     else if ( type == "KURL" )
 	arg << KURL( s );
-    else if ( type == "TQVariant" ) {
+    else if ( type == TQVARIANT_OBJECT_NAME_STRING ) {
 	if ( s == "true" || s == "false" )
 	    arg << TQVariant( mkBool( s ), 42 );
 	else if ( s.left( 4 ) == "int(" )
 	    arg << TQVariant( s.mid(4, s.length()-5).toInt() );
-	else if ( s.left( 7 ) == "TQPoint(" )
+	else if ( s.left( 7 ) == TQPOINT_OBJECT_NAME_STRING "(" )
 	    arg << TQVariant( mkPoint( s.mid(7, s.length()-8) ) );
-	else if ( s.left( 6 ) == "TQSize(" )
+	else if ( s.left( 6 ) == TQSIZE_OBJECT_NAME_STRING "(" )
 	    arg << TQVariant( mkSize( s.mid(6, s.length()-7) ) );
-	else if ( s.left( 6 ) == "TQRect(" )
+	else if ( s.left( 6 ) == TQRECT_OBJECT_NAME_STRING "(" )
 	    arg << TQVariant( mkRect( s.mid(6, s.length()-7) ) );
-	else if ( s.left( 7 ) == "TQColor(" )
+	else if ( s.left( 7 ) == TQCOLOR_OBJECT_NAME_STRING "(" )
 	    arg << TQVariant( mkColor( s.mid(7, s.length()-8) ) );
 	else
 	    arg << TQVariant( s );
-    } else if ( type.startsWith("TQValueList<") ||
+    } else if ( type.startsWith(TQVALUELIST_OBJECT_NAME_STRING "<") ||
 	        type == "KURL::List" ) {
 	if ( type == "KURL::List" )
             type = "KURL";