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

(-)a/misc/export_borrowers.pl (-2 / +1 lines)
Lines 26-32 use Getopt::Long qw(:config no_ignore_case); Link Here
26
use C4::Context;
26
use C4::Context;
27
use C4::Members;
27
use C4::Members;
28
28
29
use encoding 'utf8';
29
binmode STDOUT, ":encoding(UTF-8)";
30
30
31
sub print_usage {
31
sub print_usage {
32
    ( my $basename = $0 ) =~ s|.*/||;
32
    ( my $basename = $0 ) =~ s|.*/||;
33
- 

Return to bug 13975