X-Git-Url: http://git.jankratochvil.net/?p=MyWeb.git;a=blobdiff_plain;f=Project.pm;h=b18391cd1ed5a4b21db4856a494ac62a80ca1c53;hp=2088d99324e57fcd6b389b72155733697bf3a9d5;hb=623f80a16fb1d68e2ec1d8e7033c194a3a5b2543;hpb=ac44c8ef5dd4c1a3ac5dc503c3b3236f71cd01bb

diff --git a/Project.pm b/Project.pm
index 2088d99..b18391c 100644
--- a/Project.pm
+++ b/Project.pm
@@ -24,6 +24,7 @@ use strict;
 use warnings;
 
 use My::Web;
+require CGI;
 
 use Exporter;
 our @EXPORT=qw();
@@ -86,7 +87,7 @@ my($class,$ListItem,%args)=@_;
 						return "Download".$_[0];
 						},
 				"format"=>sub ($) {
-						return a_href($_[0],CGI::escapeHTML(File::Basename::basename($_[0])));
+						return a_href($_[0],CGI::escapeHTML(File::Basename::basename($_[0])),"size"=>2);
 						}},
 		{"key"=>qr(^link\b),"text"=>sub ($) {
 						$_[0]=~s/^link-//;