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

(-)a/acqui/basketgroup.pl (-2 / +1 lines)
Lines 131-137 sub printbasketgrouppdf{ Link Here
131 
        $pdfformat = "Koha::$pdfformat";
 131 
        $pdfformat = "Koha::$pdfformat";
132 
        my $pdfformat_filepath = File::Spec->catfile(split /::/, $pdfformat) . '.pm';
 132 
        my $pdfformat_filepath = File::Spec->catfile(split /::/, $pdfformat) . '.pm';
133 
        require $pdfformat_filepath;
 133 
        require $pdfformat_filepath;
134 
        import $pdfformat;
 134 
        import $pdfformat qw(printpdf);
135 
    }
 135 
    }
136 
    else {
 136 
    else {
137 
        print $input->header;
 137 
        print $input->header;
138 
-

Return to bug 21853