From 35257848f97710b8107e20f690404cfaf0838f74 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Fri, 20 Jul 2007 14:43:09 +0200
Subject: [PATCH] Some Perl modules have moved to UCW namespace.

---
 lib/perl/Config.pm            | 4 ++--
 lib/perl/Filelock/Filelock.pm | 6 +++---
 lib/perl/Filelock/Filelock.xs | 2 +-
 lib/perl/Filelock/Makefile.PL | 2 +-
 lib/perl/Log.pm               | 2 +-
 lib/perl/Ulimit/Makefile.PL   | 2 +-
 lib/perl/Ulimit/Ulimit.pm     | 8 ++++----
 lib/perl/Ulimit/Ulimit.xs     | 2 +-
 8 files changed, 14 insertions(+), 14 deletions(-)

diff --git a/lib/perl/Config.pm b/lib/perl/Config.pm
index d145495c..552690ca 100644
--- a/lib/perl/Config.pm
+++ b/lib/perl/Config.pm
@@ -5,7 +5,7 @@
 #	This software may be freely distributed and used according to the terms
 #	of the GNU Lesser General Public License.
 
-package Sherlock::Config;
+package UCW::Config;
 
 use strict;
 use warnings;
@@ -44,7 +44,7 @@ sub Parse(@) {
 			} elsif (ref $var eq "ARRAY") {
 				push @$var, $val;
 			} elsif (ref $var) {
-				die ("Sherlock::Config::Parse: don't know how to set $o");
+				die ("UCW::Config::Parse: don't know how to set $o");
 			}
 		}
 	}
diff --git a/lib/perl/Filelock/Filelock.pm b/lib/perl/Filelock/Filelock.pm
index a3506050..a81865e7 100644
--- a/lib/perl/Filelock/Filelock.pm
+++ b/lib/perl/Filelock/Filelock.pm
@@ -8,10 +8,10 @@
 #
 #
 # Interface:
-#   Sherlock::Filelock::fcntl_lock($fd, $cmd, $type, $whence, $start, $len)
+#   UCW::Filelock::fcntl_lock($fd, $cmd, $type, $whence, $start, $len)
 #
 
-package Sherlock::Filelock;
+package UCW::Filelock;
 
 use 5.006;
 use strict;
@@ -24,7 +24,7 @@ unshift @DynaLoader::dl_library_path, "lib";
 
 our $VERSION = '0.01';
 
-bootstrap Sherlock::Filelock $VERSION;
+bootstrap UCW::Filelock $VERSION;
 
 # Preloaded methods go here.
 
diff --git a/lib/perl/Filelock/Filelock.xs b/lib/perl/Filelock/Filelock.xs
index 7b830e29..df92e035 100644
--- a/lib/perl/Filelock/Filelock.xs
+++ b/lib/perl/Filelock/Filelock.xs
@@ -12,7 +12,7 @@
 #include <fcntl.h>
 
 
-MODULE = Sherlock::Filelock		PACKAGE = Sherlock::Filelock
+MODULE = UCW::Filelock		PACKAGE = UCW::Filelock
 
 PROTOTYPES: ENABLED
 
diff --git a/lib/perl/Filelock/Makefile.PL b/lib/perl/Filelock/Makefile.PL
index b0092ea4..edc23aa3 100644
--- a/lib/perl/Filelock/Makefile.PL
+++ b/lib/perl/Filelock/Makefile.PL
@@ -2,7 +2,7 @@
 
 use ExtUtils::MakeMaker;
 WriteMakefile(
-    'NAME'		=> 'Sherlock::Filelock',
+    'NAME'		=> 'UCW::Filelock',
     'VERSION_FROM'	=> 'Filelock.pm',
     'INST_LIB'		=> 'lib',
     'INST_ARCHLIB'	=> 'arch',
diff --git a/lib/perl/Log.pm b/lib/perl/Log.pm
index 7c4f3a10..6b1fa1fc 100644
--- a/lib/perl/Log.pm
+++ b/lib/perl/Log.pm
@@ -4,7 +4,7 @@
 #	(c) 2007 Pavel Charvat <pchar@ucw.cz>
 #
 
-package Sherlock::Log;
+package UCW::Log;
 
 use lib 'lib/perl5';
 use strict;
diff --git a/lib/perl/Ulimit/Makefile.PL b/lib/perl/Ulimit/Makefile.PL
index 37d0bdf3..1f5ae5af 100644
--- a/lib/perl/Ulimit/Makefile.PL
+++ b/lib/perl/Ulimit/Makefile.PL
@@ -2,7 +2,7 @@
 
 use ExtUtils::MakeMaker;
 WriteMakefile(
-    'NAME'		=> 'Sherlock::Ulimit',
+    'NAME'		=> 'UCW::Ulimit',
     'VERSION_FROM'	=> 'Ulimit.pm',
     'INST_LIB'		=> 'lib',
     'INST_ARCHLIB'	=> 'arch',
diff --git a/lib/perl/Ulimit/Ulimit.pm b/lib/perl/Ulimit/Ulimit.pm
index 8e198324..8497dfa0 100644
--- a/lib/perl/Ulimit/Ulimit.pm
+++ b/lib/perl/Ulimit/Ulimit.pm
@@ -8,15 +8,15 @@
 #
 #
 # 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;
@@ -40,7 +40,7 @@ our $AS = 9;
 
 our $VERSION = '0.01';
 
-bootstrap Sherlock::Ulimit $VERSION;
+bootstrap UCW::Ulimit $VERSION;
 
 # Preloaded methods go here.
 
diff --git a/lib/perl/Ulimit/Ulimit.xs b/lib/perl/Ulimit/Ulimit.xs
index 5d6a368d..5290cf1d 100644
--- a/lib/perl/Ulimit/Ulimit.xs
+++ b/lib/perl/Ulimit/Ulimit.xs
@@ -12,7 +12,7 @@
 #include <unistd.h>
 
 
-MODULE = Sherlock::Ulimit		PACKAGE = Sherlock::Ulimit
+MODULE = UCW::Ulimit		PACKAGE = UCW::Ulimit
 
 PROTOTYPES: ENABLED
 
-- 
2.39.2