update
[www.jankratochvil.net.git] / project / List.html.pl
index 598c73c..76b1ec3 100755 (executable)
@@ -60,7 +60,9 @@ 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>";
+               return "<a href=\"".$_[1]."/\">"
+                               .$item{$_[1]}{"priority"}.":"   # debug
+                               .$_[0]."</a>";
                };
 
 $col{"license"}{"format"}=sub {