| Lines 100-108
          if ( $output_format eq 'csv' and not $csv_profile_id ) {
      
      
        Link Here | 
        
          | 100 |     pod2usage(q|Define a csv profile to export in CSV|); | 100 |     pod2usage(q|Define a csv profile to export in CSV|); | 
        
          | 101 | } | 101 | } | 
        
          | 102 |  | 102 |  | 
            
              | 103 | if ( $timestamp and $record_type ne 'bibs' ) { |  |  | 
            
              | 104 |     pod2usage(q|--timestamp can only be used with biblios|); | 
            
              | 105 | } | 
        
          | 106 |  | 103 |  | 
        
          | 107 | if ( $record_type ne 'bibs' and $record_type ne 'auths' ) { | 104 | if ( $record_type ne 'bibs' and $record_type ne 'auths' ) { | 
        
          | 108 |     pod2usage(q|--record_type is not valid|); | 105 |     pod2usage(q|--record_type is not valid|); | 
  
    | Lines 210-229
          if ( $record_type eq 'bibs' ) {
      
      
        Link Here | 
        
          | 210 |     } | 207 |     } | 
        
          | 211 | } | 208 | } | 
        
          | 212 | elsif ( $record_type eq 'auths' ) { | 209 | elsif ( $record_type eq 'auths' ) { | 
          
            
              | 213 |     my $conditions = { | 210 |     if ($timestamp) { | 
            
              | 214 |         ( $starting_authid or $ending_authid ) | 211 |         push @record_ids, $_->{authid} for @{ | 
            
              |  |  | 212 |             $dbh->selectall_arrayref( | 
            
              | 213 |                 q| ( | 
            
              | 214 |                 SELECT authid | 
            
              | 215 |                 FROM auth_header | 
            
              | 216 |                 WHERE modification_time >= ? | 
            
              | 217 |             ) |, { Slice => {} }, $timestamp | 
            
              | 218 |             ); | 
            
              | 219 |         }; | 
            
              | 220 |     } else { | 
            
              | 221 |         my $conditions = { | 
            
              | 222 |             ( $starting_authid or $ending_authid ) | 
        
          | 215 |             ? ( | 223 |             ? ( | 
        
          | 216 |                 authid => { | 224 |                 authid => { | 
        
          | 217 |                     ( $starting_authid ? ( '>=' => $starting_authid ) : () ), | 225 |                     ( $starting_authid ? ( '>=' => $starting_authid ) : () ), | 
          
            
              | 218 |                     ( $ending_authid   ? ( '<=' => $ending_authid   ) : () ), | 226 |                     ( $ending_authid   ? ( '<=' => $ending_authid )   : () ), | 
        
          | 219 |                 } | 227 |                 } | 
          
            
              | 220 |             ) | 228 |                 ) | 
        
          | 221 |             : (), | 229 |             : (), | 
          
            
              | 222 |         ( $authtype ? ( authtypecode => $authtype ) : () ), | 230 |             ( $authtype ? ( authtypecode => $authtype ) : () ), | 
            
              | 223 |     }; | 231 |         }; | 
            
              | 224 |     # Koha::MetadataRecord::Authority is not a Koha::Object... | 232 |  | 
            
              | 225 |     my $authorities = Koha::Database->new->schema->resultset('AuthHeader')->search( $conditions ); | 233 |         # Koha::MetadataRecord::Authority is not a Koha::Object... | 
            
              | 226 |     @record_ids = map { $_->authid } $authorities->all; | 234 |         my $authorities = Koha::Database->new->schema->resultset('AuthHeader')->search($conditions); | 
            
              |  |  | 235 |         @record_ids = map { $_->authid } $authorities->all; | 
            
              | 236 |     } | 
        
          | 227 | } | 237 | } | 
        
          | 228 |  | 238 |  | 
        
          | 229 | @record_ids = uniq @record_ids; | 239 | @record_ids = uniq @record_ids; | 
            
              | 230 | -  |  |  |