| Lines 323-329
          subtest 'Testing download headers' => sub {
      
      
        Link Here | 
        
          | 323 |     plan tests => 2; | 323 |     plan tests => 2; | 
        
          | 324 |     my $test_pdf = Koha::UploadedFile->new({ filename => 'pdf.pdf', uploadcategorycode => 'B', filesize => 1000 }); | 324 |     my $test_pdf = Koha::UploadedFile->new({ filename => 'pdf.pdf', uploadcategorycode => 'B', filesize => 1000 }); | 
        
          | 325 |     my $test_not = Koha::UploadedFile->new({ filename => 'pdf.not', uploadcategorycode => 'B', filesize => 1000 }); | 325 |     my $test_not = Koha::UploadedFile->new({ filename => 'pdf.not', uploadcategorycode => 'B', filesize => 1000 }); | 
          
            
              | 326 |     my @pdf_expect = ( '-type'=>'application/pdf','Content-Disposition'=>'inline; filename=pdf.pdf' ); | 326 |     my @pdf_expect = ( '-type'=>'application/pdf','Content-Disposition'=>'inline; filename="pdf.pdf"' ); | 
        
          | 327 |     my @not_expect = ( '-type'=>'application/octet-stream','-attachment'=>'pdf.not' ); | 327 |     my @not_expect = ( '-type'=>'application/octet-stream','-attachment'=>'pdf.not' ); | 
        
          | 328 |     my @pdf_head = $test_pdf->httpheaders; | 328 |     my @pdf_head = $test_pdf->httpheaders; | 
        
          | 329 |     my @not_head = $test_not->httpheaders; | 329 |     my @not_head = $test_not->httpheaders; | 
            
              | 330 | -  |  |  |