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