| 
      
            Lines 552-562
          if ( $op eq 'cud-change-framework' ) {
      
      
        Link Here
      
     | 
  
        
          | 552 | 
          }  | 
          552 | 
          }  | 
        
        
          | 553 | 
           | 
          553 | 
           | 
        
        
          | 554 | 
          my $dbh = C4::Context->dbh;  | 
          554 | 
          my $dbh = C4::Context->dbh;  | 
        
            
               | 
               | 
              555 | 
              my $authobj = Koha::Authorities->find($authid);  | 
            
            
              | 556 | 
              if ( defined $authid && !$authid || $authid && !$authobj ) { | 
            
            
              | 557 | 
                  print $input->redirect("/cgi-bin/koha/errors/404.pl");    # escape early | 
            
            
              | 558 | 
                  exit;  | 
            
            
              | 559 | 
              }  | 
            
        
          | 555 | 
          if(!$authtypecode) { | 
          560 | 
          if(!$authtypecode) { | 
        
          
            
              | 556 | 
                  $authtypecode = $authid ? Koha::Authorities->find($authid)->authtypecode : '';  | 
              561 | 
                  $authtypecode = $authid ? $authobj->authtypecode : '';  | 
            
        
          | 557 | 
          }  | 
          562 | 
          }  | 
        
        
          | 558 | 
           | 
          563 | 
           | 
        
            
              | 559 | 
              my $authobj = Koha::Authorities->find($authid);  | 
               | 
               | 
            
        
          | 560 | 
          my $count = $authobj ? $authobj->get_usage_count : 0;  | 
          564 | 
          my $count = $authobj ? $authobj->get_usage_count : 0;  | 
        
        
          | 561 | 
           | 
          565 | 
           | 
        
        
          | 562 | 
          my ($template, $loggedinuser, $cookie)  | 
          566 | 
          my ($template, $loggedinuser, $cookie)  | 
        
            
              | 563 | 
              -   | 
               | 
               |