| Lines 674-680
          my @typeloop;
      
      
        Link Here | 
        
          | 674 | my $no_categories = 1; | 674 | my $no_categories = 1; | 
        
          | 675 | my $no_add; | 675 | my $no_add; | 
        
          | 676 | foreach my $category_type (qw(C A S P I X)) { | 676 | foreach my $category_type (qw(C A S P I X)) { | 
          
            
              | 677 |     my $patron_categories = Koha::Patron::Categories->search_limited({ category_type => $category_type }, {order_by => ['categorycode']}); | 677 |     my $categories_limits = { category_type => $category_type }; | 
            
              |  |  | 678 |     $categories_limits->{canbeguarantee} = 1 if ($guarantor_id); | 
            
              | 679 |     my $patron_categories = Koha::Patron::Categories->search_limited( $categories_limits, {order_by => ['categorycode']} ); | 
        
          | 678 |     $no_categories = 0 if $patron_categories->count > 0; | 680 |     $no_categories = 0 if $patron_categories->count > 0; | 
        
          | 679 |  | 681 |  | 
        
          | 680 |     my @categoryloop; | 682 |     my @categoryloop; | 
            
              | 681 | -  |  |  |