summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/XXV/OUTPUT/Html.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/XXV/OUTPUT/Html.pm b/lib/XXV/OUTPUT/Html.pm
index 5884fc1..b918e81 100644
--- a/lib/XXV/OUTPUT/Html.pm
+++ b/lib/XXV/OUTPUT/Html.pm
@@ -279,7 +279,7 @@ sub parseTemplateFile {
return entities($s);
},
version => sub{ return main::getVersion },
- loadfile => sub{ return load_file(@_) },
+ loadfile => sub{ return load_file(@_,'binary') },
writefile => sub{
my $filename = shift || return error('No filename defined!');
my $data = shift || return error('No data defined!');
@@ -289,7 +289,7 @@ sub parseTemplateFile {
# absolut Path to file
my $file = sprintf('%s/%s', $dir, $filename);
# absolut Path to file
- if(save_file($file, $data)) {
+ if(save_file($file, $data,'binary')) {
# return the relative Path
my ($relpath) = $file =~ '/(.+?/.+?)$';
return sprintf('tempimages/%s', $filename);
@@ -656,7 +656,7 @@ sub datei {
lg sprintf("stream file : '%s' (%s)",$file,convert($size));
$self->_stream([$file],$size, 0, $typ, %args);
} else {
- my $data = load_file($file) || '';
+ my $data = load_file($file,'binary') || '';
# send data
$self->out($data, $typ, %args );
}