Mod to classification

C4/Search.pm

@@ -237,8 +237,14 @@ sub ItemInfo {
     }
 
     $isth->finish;
+    my $class = $data->{'classification'};
+    my $dewey = $data->{'dewey'};
+    $dewey =~ s/0+$//;
+    $class = $class.$dewey;
+    $class = $class.$data->{'subclass'};
+ #   $results[$i]="$data->{'title'}\t$data->{'barcode'}\t$datedue\t$data->{'branchname'}\t$data->{'dewey'}";
+     $results[$i]="$data->{'title'}\t$data->{'barcode'}\t$datedue\t$data->{'branchname'}\t$class;
   
-$results[$i]="$data->{'title'}\t$data->{'barcode'}\t$datedue\t$data->{'branchname'}\t$data->{'dewey'}";
     $i++;
   }
   $sth->finish;