diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2004-03-04 21:38:57 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2004-03-04 21:38:57 +0000 |
| commit | f687c58382f4b95feb695ed73228b771780e828e (patch) | |
| tree | d74d4e6a00593a7d2e1f1b6c81271811d644d324 /lib/AutoSplit.t | |
| parent | 722969e2558105c9a60bf5758cf8dd5f3eedca60 (diff) | |
| download | perl-f687c58382f4b95feb695ed73228b771780e828e.tar.gz | |
remove an 'if $a if 0' from AutoSplit.t
p4raw-id: //depot/perl@22434
Diffstat (limited to 'lib/AutoSplit.t')
| -rw-r--r-- | lib/AutoSplit.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/AutoSplit.t b/lib/AutoSplit.t index 174902a1d8..f767a00364 100644 --- a/lib/AutoSplit.t +++ b/lib/AutoSplit.t @@ -299,7 +299,7 @@ Split prior to checking whether obsolete files get deleted use AutoLoader 'AUTOLOAD'; 1; __END__ -sub obsolete {my $a if 0; return $a++;} +sub obsolete {our $hidden_a; return $hidden_a++;} sub gonner {warn "This gonner function should never get called"} ## Get AutoSplitting *INC**PATHSEP**MOD*.pm (*DIR**PATHSEP**MOD**ENDPATHSEP*) |