[Gd-chatter] r11612 - in trunk/libraries/network/koala/sources: koala xml-rpc-common

[cgay at gwydiondylan.org]

Author: cgay
Date: Wed Jan  9 13:26:58 2008
New Revision: 11612

Removed:
   trunk/libraries/network/koala/sources/xml-rpc-common/base64.dylan
Modified:
   trunk/libraries/network/koala/sources/koala/library.dylan
   trunk/libraries/network/koala/sources/xml-rpc-common/library.dylan
   trunk/libraries/network/koala/sources/xml-rpc-common/xml-rpc-common.lid
Log:
job: koala
Remove redundant base64 code from xml-rpc-common.

Modified: trunk/libraries/network/koala/sources/koala/library.dylan
==============================================================================
--- trunk/libraries/network/koala/sources/koala/library.dylan	(original)
+++ trunk/libraries/network/koala/sources/koala/library.dylan	Wed Jan  9 13:26:58 2008
@@ -347,9 +347,7 @@
   //use ssl-sockets;
   use xml-parser,
     prefix: "xml$";
-  use xml-rpc-common,
-    // TODO: remove base64 code from xml-rpc-common
-    exclude: { base64-decode, base64-encode };
+  use xml-rpc-common;
   use win32-kernel,
     import: { LoadLibrary, FreeLibrary };
   use base64;

Modified: trunk/libraries/network/koala/sources/xml-rpc-common/library.dylan
==============================================================================
--- trunk/libraries/network/koala/sources/xml-rpc-common/library.dylan	(original)
+++ trunk/libraries/network/koala/sources/xml-rpc-common/library.dylan	Wed Jan  9 13:26:58 2008
@@ -14,20 +14,25 @@
   use xml-parser,
     import: { xml-parser };
   use dylan-basics;
+  use base64;
   export xml-rpc-common;
 end;
 
 define module xml-rpc-common
   use dylan;
-  use common-extensions, exclude: { format-to-string };
+  use common-extensions,
+    exclude: { format-to-string };
   use format;
   use streams;
   use date,
-    import: { <date>, as-iso8601-string };
+    import: { <date>,
+              as-iso8601-string };
   use xml-parser,
     prefix: "xml$";
-  use dylan-basics, exclude: { split };
-
+  use dylan-basics,
+    exclude: { split };
+  use base64,
+    import: { base64-decode };
   export
     <xml-rpc-error>,
     <xml-rpc-parse-error>, xml-rpc-parse-error,
@@ -37,8 +42,6 @@
     find-child,
     *debugging-xml-rpc*,
     set-strict-mode,
-    base64-encode,
-    base64-decode;
 end;
 
 

Modified: trunk/libraries/network/koala/sources/xml-rpc-common/xml-rpc-common.lid
==============================================================================
--- trunk/libraries/network/koala/sources/xml-rpc-common/xml-rpc-common.lid	(original)
+++ trunk/libraries/network/koala/sources/xml-rpc-common/xml-rpc-common.lid	Wed Jan  9 13:26:58 2008
@@ -1,4 +1,3 @@
 library: xml-rpc-common
 files: library
        xml-rpc-common
-       base64