"args_check"=>{
"platform"=>'^(?:platform)?$',
},
+ "rel_up"=>top_dir(),
+ "rel_start"=>top_dir(),
+ "footer_ids"=>0,
);
My::Web->heading();
$col{"name"}{"format"}=sub {
$_[0]=~s#<a\s[^>]*>([^<]*)</a>#$1#g;
return "<a href=\"".$_[1]."/\">"
- .$item{$_[1]}{"priority"}.":" # debug
+ .(!$My::Web::W->{"args"}{"W"} ? "" : $item{$_[1]}{"priority"}.":")
.$_[0]."</a>";
};
for my $order_by (@row_order,"name") {
my $order_by=$order_by;
my $minus=($order_by=~s/^(-)//)[0];
- my $r=($item{$a}{$order_by} cmp $item{$b}{$order_by});
+ # FIXME: 'cmp' or '<=>'?
+ my $r=($item{$a}{$order_by} <=> $item{$b}{$order_by});
$r=-$r if $minus;
return $r if $r;
}