Change 15294 by jhi@alpha on 2002/03/18 14:19:29
Be tidy.
Affected files ...
.... //depot/perl/ext/B/t/xref.t#2 edit
Differences ...
==== //depot/perl/ext/B/t/xref.t#2 (text) ====
Index: perl/ext/B/t/xref.t
--- perl/ext/B/t/xref.t.~1~ Mon Mar 18 07:30:05 2002
+++ perl/ext/B/t/xref.t Mon Mar 18 07:30:05 2002
@@ -93,6 +93,10 @@
'1001', 'glob FOO used in subroutine foo'
);
+END {
+ 1 while unlink $file;
+}
+
# End of tests.
# Now some stuff to feed B::Xref
@@ -100,3 +104,4 @@
package Testing::Xref;
sub foo { print FOO %::xreftable; }
sub bar { print FOO foo; }
+
End of Patch.