# get framework list
my $frameworks = getframeworks;
my @frameworkcodeloop;
-foreach my $thisframeworkcode ( keys %{$frameworks} ) {
- push @frameworkcodeloop, {
+foreach my $thisframeworkcode ( sort keys %$frameworks ) {
+ push @frameworkcodeloop,{
value => $thisframeworkcode,
frameworktext => $frameworks->{$thisframeworkcode}->{'frameworktext'},
};
( $countbr, @resultsbr ) = BreedingSearch( $title, $isbn );
}
my $breeding_loop = [];
-my $id = 0;
for my $resultsbr (@resultsbr) {
push @{$breeding_loop}, {
- id => $id++,
+ id => $resultsbr->{import_record_id},
isbn => $resultsbr->{isbn},
copyrightdate => $resultsbr->{copyrightdate},
editionstatement => $resultsbr->{editionstatement},
- file => $resultsbr->{file},
+ file => $resultsbr->{file_name},
title => $resultsbr->{title},
author => $resultsbr->{author},
};