| Lines 22-29
          use warnings;
      
      
        Link Here | 
        
          | 22 |  | 22 |  | 
        
          | 23 | use MIME::Lite; | 23 | use MIME::Lite; | 
        
          | 24 | use Mail::Sendmail; | 24 | use Mail::Sendmail; | 
            
              | 25 | use Encode; |  |  | 
            
              | 26 | use Carp; | 
        
          | 27 |  | 25 |  | 
        
          | 28 | use C4::Members; | 26 | use C4::Members; | 
        
          | 29 | use C4::Branch; | 27 | use C4::Branch; | 
  
    | Lines 390-397
          sub SendAlerts {
      
      
        Link Here | 
        
          | 390 |             my %mail = ( | 388 |             my %mail = ( | 
        
          | 391 |                 To             => $to, | 389 |                 To             => $to, | 
        
          | 392 |                 From           => $userenv->{emailaddress}, | 390 |                 From           => $userenv->{emailaddress}, | 
          
            
              | 393 |                 Subject        => "" . $innerletter->{title}, | 391 |                 Subject        => Encode::encode( "utf8", "" . $innerletter->{title} ), | 
            
              | 394 |                 Message        => "" . $innerletter->{content}, | 392 |                 Message        => Encode::encode( "utf8", "" . $innerletter->{content} ), | 
        
          | 395 |                 'Content-Type' => 'text/plain; charset="utf8"', | 393 |                 'Content-Type' => 'text/plain; charset="utf8"', | 
        
          | 396 |             ); | 394 |             ); | 
        
          | 397 |             sendmail(%mail) or carp $Mail::Sendmail::error; | 395 |             sendmail(%mail) or carp $Mail::Sendmail::error; | 
            
              | 398 | -  |  |  |