Index: openacs-4/packages/xowiki/tcl/syndicate-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/syndicate-procs.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/xowiki/tcl/syndicate-procs.tcl	8 Nov 2007 13:18:10 -0000	1.23
+++ openacs-4/packages/xowiki/tcl/syndicate-procs.tcl	9 Nov 2007 09:01:50 -0000	1.24
@@ -391,12 +391,15 @@
   
   RSS-client instproc load { } {
     set r [::xo::HttpRequest new -url [my url] -volatile]
-    my msg "statuscode = [$r set status_code], content_type=[$r set content_type]"
+    #my msg "statuscode = [$r set status_code], content_type=[$r set content_type]"
     set f [open /tmp/feed w]; fconfigure $f -translation binary; puts $f [$r set data]; close $f
-    return [$r set data]
+    set xml [$r set data]
+    set charset utf-8
+    regexp {^<\?xml\s+version\s*=\s*\S+\s+encoding\s*=\s*[\"'](\S+)[\"']} $xml _ charset
+    return [encoding convertfrom $charset $xml]
   }
 
-  RSS-client instproc parse { data} {
+  RSS-client instproc parse {data} {
     set doc [ dom parse $data ]
     set root [ $doc documentElement ]