X-Git-Url: http://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=blobdiff_plain;f=project%2FList.html.pl;h=fc149c9d38dc9b437bfdf550788b6e24f406e44d;hp=9cffbf4416570e432e53d570c8fda4ee9369c70c;hb=865903cee4ca797a0a4211c8dd691b252d6e6403;hpb=9326020b1d3d7d25961eb97ebe32718e5c64c29a

diff --git a/project/List.html.pl b/project/List.html.pl
index 9cffbf4..fc149c9 100755
--- a/project/List.html.pl
+++ b/project/List.html.pl
@@ -37,8 +37,8 @@ My::Web->init(
 		"args_check"=>{
 				"platform"=>'^(?:platform)?$',
 				},
-		"rel_up"=>top_dir(),
-		"rel_start"=>top_dir(),
+#		"rel_up"=>top_dir(),	# TODO:homepage
+#		"rel_start"=>top_dir(),	# TODO:homepage
 		"footer_ids"=>0,
 		);
 My::Web->heading();
@@ -112,6 +112,7 @@ my($platform)=@_;
 					my $order_by=$order_by;
 					my $minus=($order_by=~s/^(-)//)[0];
 					# FIXME: 'cmp' or '<=>'?
+					# Currently it complains on "name" not <=>able if two projects have the same 'priority'.
 					my $r=($item{$a}{$order_by} <=> $item{$b}{$order_by});
 					$r=-$r if $minus;
 					return $r if $r;