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 -N -r1.28 -r1.29 --- openacs-4/packages/xowiki/tcl/syndicate-procs.tcl 26 Nov 2007 09:14:43 -0000 1.28 +++ openacs-4/packages/xowiki/tcl/syndicate-procs.tcl 1 Jan 2008 23:32:33 -0000 1.29 @@ -400,9 +400,12 @@ #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 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 [string tolower $charset] $xml] + return $xml + # the following does not appear to be necessary due to changes in http-client-procs. + #set charset utf-8 + #regexp {^<\?xml\s+version\s*=\s*\S+\s+encoding\s*=\s*[\"'](\S+)[\"']} $xml _ charset + #ns_log notice "charse=$charset,xml=$xml" + #return [encoding convertfrom [string tolower $charset] $xml] } RSS-client instproc parse {data} {