use warnings;
use My::Web;
+require CGI;
use Exporter;
our @EXPORT=qw();
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-//;