END
-foreach $part_pkg ( sort {
+foreach my $part_pkg ( sort {
$a->getfield('pkgpart') <=> $b->getfield('pkgpart')
} @part_pkg ) {
my($hashref)=$part_pkg->hashref;
@@ -106,8 +92,9 @@ END
print "";
}
+$colspan = $cgi->param('showdisabled') ? 8 : 9;
print <Add a new package definition |
+