| 
      
            Lines 28-33
          BEGIN {
      
      
        Link Here
      
     | 
  
        
          | 28 | 
          # Optionally change marc flavour  | 
          28 | 
          # Optionally change marc flavour  | 
        
        
          | 29 | 
          my $marcflavour;  | 
          29 | 
          my $marcflavour;  | 
        
        
          | 30 | 
          GetOptions( 'flavour:s' => \$marcflavour );  | 
          30 | 
          GetOptions( 'flavour:s' => \$marcflavour );  | 
        
            
               | 
               | 
              31 | 
              $marcflavour //= 'MARC21';  | 
            
        
          | 31 | 
          t::lib::Mocks::mock_preference( 'marcflavour', $marcflavour ) if $marcflavour;  | 
          32 | 
          t::lib::Mocks::mock_preference( 'marcflavour', $marcflavour ) if $marcflavour;  | 
        
        
          | 32 | 
           | 
          33 | 
           | 
        
        
          | 33 | 
          my $schema  = Koha::Database->new->schema;  | 
          34 | 
          my $schema  = Koha::Database->new->schema;  | 
        
  
    | 
      
            Lines 40-45
          $heading_module->mock(
      
      
        Link Here
      
     | 
  
        
          | 40 | 
                  return 1;  | 
          41 | 
                  return 1;  | 
        
        
          | 41 | 
              }  | 
          42 | 
              }  | 
        
        
          | 42 | 
          );  | 
          43 | 
          );  | 
        
            
               | 
               | 
              44 | 
              my $auth_module = Test::MockModule->new('C4::AuthoritiesMarc'); | 
            
            
              | 45 | 
              $auth_module->mock(  | 
            
            
              | 46 | 
                  'GuessAuthTypeCode',  | 
            
            
              | 47 | 
                  sub { | 
            
            
              | 48 | 
                      $marcflavour eq 'MARC21' ? return 'PERSO_NAME' : return 'NP';  | 
            
            
              | 49 | 
                  }  | 
            
            
              | 50 | 
              );  | 
            
        
          | 43 | 
           | 
          51 | 
           | 
        
        
          | 44 | 
          # Global variables, mocking and framework modifications  | 
          52 | 
          # Global variables, mocking and framework modifications  | 
        
        
          | 45 | 
          our @linkedrecords;  | 
          53 | 
          our @linkedrecords;  | 
        
            
              | 46 | 
              -   | 
               | 
               |