projects sorted
[www.jankratochvil.net.git] / project / Index.html.pl
index bee2eae..dbbf486 100755 (executable)
@@ -36,6 +36,7 @@ My::Web->init(
                "section"=>"Projects",
                "rel_up"=>top_dir(),
                "rel_start"=>top_dir(),
+               "footer_ids"=>0,
                );
 My::Web->heading();
 
@@ -44,22 +45,6 @@ print My::Project->platforms(undef());
 
 my %item=( My::Project::item_hash_read() );
 
-# $col{"name"}{"show"}=1
-# $col{"name"}{"format"}=sub { "<".$_[0].">"; }
-# $col{"name"}{""}="Project name";
-# @col_order
-
-my @row_order=qw(-priority);
-my @col_order=qw(name summary license maintenance language);
-my %col;
-
-sub format_url ($) { return (!$_[0] ? "" : '<a href="'.$_[0].'">X</a>'); }
-
-$col{"name"}{"format"}=sub {
-               $_[0]=~s#<a\s[^>]*>([^<]*)</a>#$1#g;
-               return "<a href=\"".$_[1]."/\">".$_[0]."</a>";
-               };
-
 my @platforms=@My::Project::platforms;
 while (@platforms) {
        my $platform_sym =shift @platforms;