On 14 Jul 2005 23:20:18 -0700, Gisle Aas <[EMAIL PROTECTED]> wrote:
> The $file variable is never used or initialized anywhere else.
> This is a fix:
Nice catch. Thanks, typo fixed in change #25144
> --- t/op/stat.t.orig 2005-07-14 23:16:52.000000000 -0700
> +++ t/op/stat.t 2005-07-14 23:17:07.000000000 -0700
> @@ -462,7 +462,7 @@
> -T _;
> my $s2 = -s _;
> is($s1, $s2, q(-T _ doesn't break the statbuffer));
> - unlink $file;
> + unlink $tmpfile;
> }
>
> END {
--
H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using Perl 5.6.2, 5.8.0, 5.8.5, & 5.9.2 on HP-UX 10.20, 11.00 & 11.11,
AIX 4.3 & 5.2, SuSE 9.2 & 9.3, and Cygwin. http://www.cmve.net/~merijn
Smoking perl: http://www.test-smoke.org, perl QA: http://qa.perl.org
reports to: [EMAIL PROTECTED], perl-qa@perl.org
