X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=lib%2Fperl%2FUlimit%2FUlimit.pm;h=8497dfa0452631adcc457ac1f3c8afda844a13b8;hb=22993e72e082bf4c79bdcfa959f0f2a79aba427c;hp=a05ea5b5d13a6442542dce4853d99a5d96e25e47;hpb=47a0795e8a28e8ad6ff55cda89e300267d9e590c;p=libucw.git

diff --git a/lib/perl/Ulimit/Ulimit.pm b/lib/perl/Ulimit/Ulimit.pm
index a05ea5b5..8497dfa0 100644
--- a/lib/perl/Ulimit/Ulimit.pm
+++ b/lib/perl/Ulimit/Ulimit.pm
@@ -8,24 +8,23 @@
 #
 #
 # Interface:
-#   Sherlock::Ulimit::setlimit( $resource, $softlimit, $hardlimit)
-#   Sherlock::Ulimit::getlimit( $resource, $softlimit, $hardlimit)
+#   UCW::Ulimit::setlimit( $resource, $softlimit, $hardlimit)
+#   UCW::Ulimit::getlimit( $resource, $softlimit, $hardlimit)
 #
 # setlimit sets limit to values supplied in softlimit and hardlimit
 # getlimit reads limits into softlimit and hardlimit
 # $resource constants are defined below
 #
 
-package Sherlock::Ulimit;
+package UCW::Ulimit;
 
 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,21 +38,9 @@ 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;
+bootstrap UCW::Ulimit $VERSION;
 
 # Preloaded methods go here.