| Lines 114-126
          subtest ImportBreedingAuth => sub {
      
      
        Link Here | 
        
          | 114 |     $breedingid_1 = C4::Breeding::ImportBreedingAuth( $record, "kidclamp", "UTF-8", 'Jansson, Tove' ); | 114 |     $breedingid_1 = C4::Breeding::ImportBreedingAuth( $record, "kidclamp", "UTF-8", 'Jansson, Tove' ); | 
        
          | 115 |     is( $breedingid, $breedingid_1, "For the same record, modified, we get the same id" ); | 115 |     is( $breedingid, $breedingid_1, "For the same record, modified, we get the same id" ); | 
        
          | 116 |  | 116 |  | 
          
            
              | 117 |     my $sth = $dbh->prepare('SELECT * FROM import_records WHERE import_record_id = ?'); | 117 |     my $imported_record     = Koha::Import::Records->find($breedingid); | 
            
              | 118 |     $sth->execute($breedingid); | 118 |     my $imported_marcrecord = $imported_record->get_marc_record(); | 
            
              | 119 |     my $imported_records_record = $sth->fetchrow_hashref(); |  |  | 
            
              | 120 |     my $imported_record         = MARC::Record::new_from_xml( $imported_records_record->{marcxml} ); | 
        
          | 121 |     is( | 119 |     is( | 
          
            
              | 122 |         $imported_record->subfield( '999', 'a' ), $record->subfield( '999', 'a' ), | 120 |         $imported_marcrecord->subfield( '999', 'a' ), $record->subfield( '999', 'a' ), | 
            
              | 123 |         'We also get the new the version of the record' | 121 |         'We also get the new version of the record' | 
        
          | 124 |     ); | 122 |     ); | 
        
          | 125 |  | 123 |  | 
        
          | 126 |     # End Bug 19220 | 124 |     # End Bug 19220 | 
            
              | 127 | -  |  |  |