| Lines 18-24
          
      
      
        Link Here | 
        
          | 18 | # along with Koha; if not, see <http://www.gnu.org/licenses>. | 18 | # along with Koha; if not, see <http://www.gnu.org/licenses>. | 
        
          | 19 |  | 19 |  | 
        
          | 20 | use Modern::Perl; | 20 | use Modern::Perl; | 
          
            
              | 21 | use Test::More tests => 69; | 21 | use Test::More tests => 70; | 
        
          | 22 | use Test::MockModule; | 22 | use Test::MockModule; | 
        
          | 23 | use Test::Warn; | 23 | use Test::Warn; | 
        
          | 24 |  | 24 |  | 
  
    | Lines 137-142
          is(
      
      
        Link Here | 
        
          | 137 |     'message marked failed if tried to send SMS message for borrower with no smsalertnumber set (bug 11208)' | 137 |     'message marked failed if tried to send SMS message for borrower with no smsalertnumber set (bug 11208)' | 
        
          | 138 | ); | 138 | ); | 
        
          | 139 |  | 139 |  | 
            
              |  |  | 140 | # ResendMessage | 
            
              | 141 | C4::Letters::ResendMessage($messages->[0]->{message_id}); | 
            
              | 142 | $messages = C4::Letters::GetQueuedMessages({ borrowernumber => $borrowernumber }); | 
            
              | 143 | is($messages->[0]->{status},'pending', 'ResendMessage sets status to pending correctly (bug 12426)'); | 
            
              | 144 |  | 
        
          | 140 | # GetLetters | 145 | # GetLetters | 
        
          | 141 | my $letters = C4::Letters::GetLetters(); | 146 | my $letters = C4::Letters::GetLetters(); | 
        
          | 142 | is( @$letters, 0, 'GetLetters returns the correct number of letters' ); | 147 | is( @$letters, 0, 'GetLetters returns the correct number of letters' ); | 
            
              | 143 | -  |  |  |