summaryrefslogtreecommitdiff
path: root/beagle/debian-rfs/usr/lib/perl/5.10.1/IO.pm
diff options
context:
space:
mode:
authorManuel Traut <manut@mecka.net>2011-07-18 14:00:12 +0200
committerManuel Traut <manut@mecka.net>2011-07-18 14:00:12 +0200
commited006a8eb44831189e152826c692330d0a0cfe3b (patch)
tree66996c44c68a8787e4a35a85aea683975f307767 /beagle/debian-rfs/usr/lib/perl/5.10.1/IO.pm
parent4493e8f707e62b9867d9cfd40205115140e7c993 (diff)
delete beagle-dir
Signed-off-by: Manuel Traut <manut@mecka.net>
Diffstat (limited to 'beagle/debian-rfs/usr/lib/perl/5.10.1/IO.pm')
-rw-r--r--beagle/debian-rfs/usr/lib/perl/5.10.1/IO.pm28
1 files changed, 0 insertions, 28 deletions
diff --git a/beagle/debian-rfs/usr/lib/perl/5.10.1/IO.pm b/beagle/debian-rfs/usr/lib/perl/5.10.1/IO.pm
deleted file mode 100644
index f28a812..0000000
--- a/beagle/debian-rfs/usr/lib/perl/5.10.1/IO.pm
+++ /dev/null
@@ -1,28 +0,0 @@
-#
-
-package IO;
-
-use XSLoader ();
-use Carp;
-use strict;
-use warnings;
-
-our $VERSION = "1.25";
-XSLoader::load 'IO', $VERSION;
-
-sub import {
- shift;
-
- warnings::warnif('deprecated', qq{Parameterless "use IO" deprecated})
- if @_ == 0 ;
-
- my @l = @_ ? @_ : qw(Handle Seekable File Pipe Socket Dir);
-
- eval join("", map { "require IO::" . (/(\w+)/)[0] . ";\n" } @l)
- or croak $@;
-}
-
-1;
-
-__END__
-