Fixed href "size"

diff --git a/Web.pm b/Web.pm
index 2b632a7..3753968 100644 (file)
--- a/Web.pm
+++ b/Web.pm
@@ -286,7 +286,7 @@ sub a_href ($;$%)
 {
 my($url,$contents,%args)=@_;
 
-       do { $$_=1 if !defined $$_; } for ($args{"size"});
+       do { $$_=1 if !defined $$_; } for (\$args{"size"});
        $contents=CGI::escapeHTML($url) if !defined $contents;
 
        my $r='<a href="';