| Lines 31-44
          my $builder = t::lib::TestBuilder->new;
      
      
        Link Here | 
        
          | 31 |  | 31 |  | 
        
          | 32 | subtest 'transport() tests' => sub { | 32 | subtest 'transport() tests' => sub { | 
        
          | 33 |  | 33 |  | 
          
            
              | 34 |     plan tests => 4; | 34 |     plan tests => 6; | 
        
          | 35 |  | 35 |  | 
        
          | 36 |     $schema->storage->txn_begin; | 36 |     $schema->storage->txn_begin; | 
        
          | 37 |  | 37 |  | 
        
          | 38 |     my $server = $builder->build_object( | 38 |     my $server = $builder->build_object( | 
        
          | 39 |         { | 39 |         { | 
        
          | 40 |             class => 'Koha::SMTP::Servers', | 40 |             class => 'Koha::SMTP::Servers', | 
          
            
              | 41 |             value => { ssl_mode => 'disabled' } | 41 |             value => { ssl_mode => 'disabled', debug => 0 } | 
        
          | 42 |         } | 42 |         } | 
        
          | 43 |     ); | 43 |     ); | 
        
          | 44 |  | 44 |  | 
  
    | Lines 52-57
          subtest 'transport() tests' => sub {
      
      
        Link Here | 
        
          | 52 |  | 52 |  | 
        
          | 53 |     is( ref($transport), 'Email::Sender::Transport::SMTP', 'Type is correct' ); | 53 |     is( ref($transport), 'Email::Sender::Transport::SMTP', 'Type is correct' ); | 
        
          | 54 |     is( $transport->ssl, '1', 'SSL is set' ); | 54 |     is( $transport->ssl, '1', 'SSL is set' ); | 
            
              |  |  | 55 |     is( $transport->debug, '0', 'Debug setting honoured (disabled)' ); | 
            
              | 56 |  | 
            
              | 57 |     $server->set({ debug => 1 })->store; | 
            
              | 58 |     $transport = $server->transport; | 
            
              | 59 |  | 
            
              | 60 |     is( $transport->debug, '1', 'Debug setting honoured (enabled)' ); | 
        
          | 55 |  | 61 |  | 
        
          | 56 |     $schema->storage->txn_rollback; | 62 |     $schema->storage->txn_rollback; | 
        
          | 57 | }; | 63 | }; | 
            
              | 58 | -  |  |  |