From: Pavel Charvat <pavel.charvat@netcentrum.cz>
Date: Tue, 20 Mar 2007 09:56:40 +0000 (+0100)
Subject: removed useless code from Ulimit & Filelock perl modules
X-Git-Tag: holmes-import~506^2~93
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=67d52e562eaeef76ee6c5d9f8ca2da573e825506;p=libucw.git

removed useless code from Ulimit & Filelock perl modules
---

diff --git a/lib/perl/Filelock/Filelock.pm b/lib/perl/Filelock/Filelock.pm
index d55d49eb..a3506050 100644
--- a/lib/perl/Filelock/Filelock.pm
+++ b/lib/perl/Filelock/Filelock.pm
@@ -17,23 +17,11 @@ use 5.006;
 use strict;
 use warnings;
 
-require Exporter;
 require DynaLoader;
 
-our @ISA = qw(Exporter DynaLoader);
+our @ISA = qw(DynaLoader);
 unshift @DynaLoader::dl_library_path, "lib";
 
-# This allows declaration	use Filelock ':all';
-# If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
-# will save memory.
-our %EXPORT_TAGS = ( 'all' => [ qw(
-
-) ] );
-
-our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
-
-our @EXPORT = qw(
-);
 our $VERSION = '0.01';
 
 bootstrap Sherlock::Filelock $VERSION;
diff --git a/lib/perl/Ulimit/Ulimit.pm b/lib/perl/Ulimit/Ulimit.pm
index a05ea5b5..8e198324 100644
--- a/lib/perl/Ulimit/Ulimit.pm
+++ b/lib/perl/Ulimit/Ulimit.pm
@@ -22,10 +22,9 @@ use 5.006;
 use strict;
 use warnings;
 
-require Exporter;
 require DynaLoader;
 
-our @ISA = qw(Exporter DynaLoader);
+our @ISA = qw(DynaLoader);
 unshift @DynaLoader::dl_library_path, "lib";
 
 our $CPU = 0;
@@ -39,18 +38,6 @@ our $NOFILE = 7;
 our $MEMLOCK = 8;
 our $AS = 9;
 
-
-# This allows declaration	use Ulimit ':all';
-# If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
-# will save memory.
-our %EXPORT_TAGS = ( 'all' => [ qw(
-
-) ] );
-
-our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
-
-our @EXPORT = qw(
-);
 our $VERSION = '0.01';
 
 bootstrap Sherlock::Ulimit $VERSION;