| Lines 31-36
          use C4::Members::Messaging;
      
      
        Link Here | 
        
          | 31 | use C4::Form::MessagingPreferences; | 31 | use C4::Form::MessagingPreferences; | 
        
          | 32 | use Koha::Patrons; | 32 | use Koha::Patrons; | 
        
          | 33 | use Koha::SMS::Providers; | 33 | use Koha::SMS::Providers; | 
            
              |  |  | 34 | use Koha::Token; | 
        
          | 34 |  | 35 |  | 
        
          | 35 | my $query = CGI->new(); | 36 | my $query = CGI->new(); | 
        
          | 36 |  | 37 |  | 
  
    | Lines 55-60
          my $patron = Koha::Patrons->find( $borrowernumber ); # FIXME and if borrowernumb
      
      
        Link Here | 
        
          | 55 | my $messaging_options = C4::Members::Messaging::GetMessagingOptions(); | 56 | my $messaging_options = C4::Members::Messaging::GetMessagingOptions(); | 
        
          | 56 |  | 57 |  | 
        
          | 57 | if ( defined $query->param('modify') && $query->param('modify') eq 'yes' ) { | 58 | if ( defined $query->param('modify') && $query->param('modify') eq 'yes' ) { | 
            
              |  |  | 59 |     die "Wrong CSRF token" unless Koha::Token->new->check_csrf({ | 
            
              | 60 |         session_id => scalar $query->cookie('CGISESSID'), | 
            
              | 61 |         token  => scalar $query->param('csrf_token'), | 
            
              | 62 |     }); | 
            
              | 63 |  | 
        
          | 58 |     my $sms = $query->param('SMSnumber'); | 64 |     my $sms = $query->param('SMSnumber'); | 
        
          | 59 |     my $sms_provider_id = $query->param('sms_provider_id'); | 65 |     my $sms_provider_id = $query->param('sms_provider_id'); | 
        
          | 60 |     $patron->set({ | 66 |     $patron->set({ | 
  
    | Lines 78-81
          if ( C4::Context->preference("SMSSendDriver") eq 'Email' ) {
      
      
        Link Here | 
        
          | 78 |     $template->param( sms_providers => \@providers, sms_provider_id => $patron->sms_provider_id ); | 84 |     $template->param( sms_providers => \@providers, sms_provider_id => $patron->sms_provider_id ); | 
        
          | 79 | } | 85 | } | 
        
          | 80 |  | 86 |  | 
            
              |  |  | 87 | my $new_session_id = $cookie->value; | 
            
              | 88 | $template->param( | 
            
              | 89 |     csrf_token => Koha::Token->new->generate_csrf({ | 
            
              | 90 |             session_id => $new_session_id, | 
            
              | 91 |         }), | 
            
              | 92 | ); | 
            
              | 93 |  | 
        
          | 81 | output_html_with_http_headers $query, $cookie, $template->output, undef, { force_no_caching => 1 }; | 94 | output_html_with_http_headers $query, $cookie, $template->output, undef, { force_no_caching => 1 }; | 
            
              | 82 | -  |  |  |