Index: openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl	21 Mar 2008 11:57:45 -0000	1.27
+++ openacs-4/packages/acs-content-repository/tcl/revision-procs.tcl	20 Nov 2008 23:24:57 -0000	1.28
@@ -74,7 +74,9 @@
 	    } else {
 		if { $string_p } {
 		    set fd [open $filename "r"]
-		    fconfigure $fd -translation binary
+		    fconfigure $fd \
+			-translation binary \
+			-encoding [encoding system] 
 		    set text [read $fd]
 		    close $fd
 		    return $text