| Lines 24-29
          use String::Random qw( random_string );
      
      
        Link Here | 
        
          | 24 | use C4::Auth; | 24 | use C4::Auth; | 
        
          | 25 | use C4::Output; | 25 | use C4::Output; | 
        
          | 26 | use C4::Members; | 26 | use C4::Members; | 
            
              |  |  | 27 | use C4::Form::MessagingPreferences; | 
        
          | 27 | use Koha::Borrower::Modifications; | 28 | use Koha::Borrower::Modifications; | 
        
          | 28 | use C4::Branch qw(GetBranchesLoop); | 29 | use C4::Branch qw(GetBranchesLoop); | 
        
          | 29 | use C4::Scrubber; | 30 | use C4::Scrubber; | 
  
    | Lines 146-151
          if ( $action eq 'create' ) {
      
      
        Link Here | 
        
          | 146 |                   C4::Context->preference('OpacPasswordChange') ); | 147 |                   C4::Context->preference('OpacPasswordChange') ); | 
        
          | 147 |  | 148 |  | 
        
          | 148 |             my ( $borrowernumber, $password ) = AddMember_Opac(%borrower); | 149 |             my ( $borrowernumber, $password ) = AddMember_Opac(%borrower); | 
            
              |  |  | 150 |             C4::Form::MessagingPreferences::handle_form_action($cgi, { borrowernumber => $borrowernumber }, $template, 1, C4::Context->preference('PatronSelfRegistrationDefaultCategory') ) if $borrowernumber && C4::Context->preference('EnhancedMessagingPreferences'); | 
        
          | 149 |  | 151 |  | 
        
          | 150 |             $template->param( password_cleartext => $password ); | 152 |             $template->param( password_cleartext => $password ); | 
        
          | 151 |             $template->param( | 153 |             $template->param( |