X-Git-Url: http://sjero.net/git/?p=wget;a=blobdiff_plain;f=tests%2FFTPTest.pm;h=c1d3d266cf0f692e0d7cad62f8ce9c92c981c767;hp=a820ef51a6ec3a25e0c50d0a119a91540113f668;hb=4a08094db88011153adadbf995103770b20d2a31;hpb=73ff253e371f58dde04ce30f04c59f2000a1b7e5 diff --git a/tests/FTPTest.pm b/tests/FTPTest.pm index a820ef51..c1d3d266 100644 --- a/tests/FTPTest.pm +++ b/tests/FTPTest.pm @@ -21,7 +21,7 @@ my $VERSION = 0.01; return $self->SUPER::_default_for($attr); } - sub _standard_keys + sub _standard_keys { my ($self) = @_; ($self->SUPER::_standard_keys(), keys %_attr_data);