Commit 768b7285 authored by jocuri%softhome.net's avatar jocuri%softhome.net

Patch for bug 271048: Remove confusion when sorting classifications by modifying…

Patch for bug 271048: Remove confusion when sorting classifications by modifying GetSelectableClassifications in order to always return a sorted list; patch by Albert Ting <altlst@sonic.net>, r=justdave, a=justdave.
parent 00596bee
...@@ -664,7 +664,7 @@ sub GetSelectableProductHash { ...@@ -664,7 +664,7 @@ sub GetSelectableProductHash {
sub GetSelectableClassifications { sub GetSelectableClassifications {
my @selectable_classes = (); my @selectable_classes = ();
foreach my $c (keys %::classdesc) { foreach my $c (sort keys %::classdesc) {
if ( scalar(GetSelectableProducts(0,$c)) > 0) { if ( scalar(GetSelectableProducts(0,$c)) > 0) {
push(@selectable_classes,$c); push(@selectable_classes,$c);
} }
......
...@@ -280,7 +280,7 @@ $vars->{'product'} = \@products; ...@@ -280,7 +280,7 @@ $vars->{'product'} = \@products;
if (Param('useclassification')) { if (Param('useclassification')) {
my @classifications = (); my @classifications = ();
foreach my $c (sort(GetSelectableClassifications())) { foreach my $c (GetSelectableClassifications()) {
# Create hash to hold attributes for each classification. # Create hash to hold attributes for each classification.
my %classification = ( my %classification = (
'name' => $c, 'name' => $c,
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment