View | Details | Raw Unified | Return to bug 9114
Collapse All | Expand All

(-)a/C4/ImportExportFramework.pm (-2 / +2 lines)
Lines 606-612 sub createODS Link Here
606
            my $ok = 0;
606
            my $ok = 0;
607
            # read ods file and return as a string
607
            # read ods file and return as a string
608
            if (-f "$tempdir/new.ods") {
608
            if (-f "$tempdir/new.ods") {
609
                if (open ($fh, '<', "$tempdir/new.ods")) {
609
                if (open ($fh, '<:encoding(UTF-8)', "$tempdir/new.ods")) {
610
                    binmode $fh;
610
                    binmode $fh;
611
                    my $buffer;
611
                    my $buffer;
612
                    while (read ($fh, $buffer, 65536)) {
612
                    while (read ($fh, $buffer, 65536)) {
Lines 698-704 sub ImportFramework Link Here
698
                    }
698
                    }
699
                } else {
699
                } else {
700
                    # They are text files, so open it to read
700
                    # They are text files, so open it to read
701
                    open($dom, '<', $filename);
701
                    open($dom, '<:encoding(UTF-8)', $filename);
702
                }
702
                }
703
                if ($dom) {
703
                if ($dom) {
704
                    # For sql we execute the line
704
                    # For sql we execute the line
(-)a/admin/import_export_framework.pl (-1 / +2 lines)
Lines 24-29 use CGI; Link Here
24
use C4::Context;
24
use C4::Context;
25
use C4::ImportExportFramework;
25
use C4::ImportExportFramework;
26
26
27
binmode STDOUT, ":encoding(UTF-8)";
28
27
my $input = new CGI;
29
my $input = new CGI;
28
30
29
my $frameworkcode = $input->param('frameworkcode') || '';
31
my $frameworkcode = $input->param('frameworkcode') || '';
30
- 

Return to bug 9114