From: Dave Mitchell <davem@fdisolutions.com>
Date: Thu, 4 Mar 2004 21:38:57 +0000 (+0000)
Subject: remove an 'if $a if 0' from AutoSplit.t
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f687c58382f4b95feb695ed73228b771780e828e;hp=722969e2558105c9a60bf5758cf8dd5f3eedca60;p=p5sagit%2Fp5-mst-13.2.git

remove an 'if $a if 0' from AutoSplit.t

p4raw-id: //depot/perl@22434
---

diff --git a/lib/AutoSplit.t b/lib/AutoSplit.t
index 174902a..f767a00 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*)