| 
      
            Lines 312-321
          if ($barcode) {
      
      
        Link Here
      
     | 
  
        
          | 312 | 
                              MARC::Record->new_from_usmarc($hit) );  | 
          312 | 
                              MARC::Record->new_from_usmarc($hit) );  | 
        
        
          | 313 | 
           | 
          313 | 
           | 
        
        
          | 314 | 
                          # offer all barcodes individually  | 
          314 | 
                          # offer all barcodes individually  | 
        
          
            
              | 315 | 
                              foreach my $barcode ( sort split(/\s*\|\s*/, $chosen->{barcode}) ) { | 
              315 | 
                              if ( $chosen->{barcode} ) { | 
            
            
              | 316 | 
                                  my %chosen_single = %{$chosen}; | 
              316 | 
                                  foreach my $barcode ( sort split(/\s*\|\s*/, $chosen->{barcode}) ) { | 
            
            
              | 317 | 
                                  $chosen_single{barcode} = $barcode; | 
              317 | 
                                      my %chosen_single = %{$chosen}; | 
            
            
              | 318 | 
                                  push( @options, \%chosen_single );  | 
              318 | 
                                      $chosen_single{barcode} = $barcode; | 
            
            
               | 
               | 
              319 | 
                                      push( @options, \%chosen_single );  | 
            
            
              | 320 | 
                                  }  | 
            
        
          | 319 | 
                          }  | 
          321 | 
                          }  | 
        
        
          | 320 | 
                      }  | 
          322 | 
                      }  | 
        
        
          | 321 | 
                      $template->param( options => \@options );  | 
          323 | 
                      $template->param( options => \@options );  | 
        
            
              | 322 | 
              -   | 
               | 
               |