From: Jarkko Hietaniemi Date: Fri, 23 Nov 2001 19:53:53 +0000 (+0000) Subject: Never mind. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=dec4a21cd24c5db492079d45b15a064b1d1d1859;p=p5sagit%2Fp5-mst-13.2.git Never mind. p4raw-id: //depot/perl@13225 --- diff --git a/lib/Filter/Simple/lib/ExportTest.pm b/lib/Filter/Simple/lib/ExportTest.pm deleted file mode 100644 index d6da629..0000000 --- a/lib/Filter/Simple/lib/ExportTest.pm +++ /dev/null @@ -1,12 +0,0 @@ -package ExportTest; - -use Filter::Simple; -use base Exporter; - -@EXPORT_OK = qw(ok); - -FILTER { s/not// }; - -sub ok { print "ok @_\n" } - -1; diff --git a/lib/Filter/Simple/lib/ImportTest.pm b/lib/Filter/Simple/lib/ImportTest.pm deleted file mode 100644 index 6646a36..0000000 --- a/lib/Filter/Simple/lib/ImportTest.pm +++ /dev/null @@ -1,19 +0,0 @@ -package ImportTest; - -use base 'Exporter'; -@EXPORT = qw(say); - -sub say { print @_ } - -use Filter::Simple; - -sub import { - my $class = shift; - print "ok $_\n" foreach @_; - __PACKAGE__->export_to_level(1,$class); -} - -FILTER { s/not // }; - - -1;