From fddf50f78d99fcc269188fcdc7eeab73d2824421 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sat, 14 Mar 2009 14:47:54 +0000
Subject: [PATCH] rename to LDAP::Virtual

---
 Makefile.PL                              |  2 +-
 bin/virtual-ldap.pl                      |  4 ++--
 lib/{VLDAP/Server.pm => LDAP/Virtual.pm} | 10 +++++-----
 3 files changed, 8 insertions(+), 8 deletions(-)
 rename lib/{VLDAP/Server.pm => LDAP/Virtual.pm} (96%)

diff --git a/Makefile.PL b/Makefile.PL
index 230a7e9..a9b92d0 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -1,6 +1,6 @@
 use inc::Module::Install;
 
-name        'VLDAP';
+name        'LDAP-Virtual';
 version     '0.00';
 license     'GPL';
 
diff --git a/bin/virtual-ldap.pl b/bin/virtual-ldap.pl
index d7dc738..b70f492 100755
--- a/bin/virtual-ldap.pl
+++ b/bin/virtual-ldap.pl
@@ -4,8 +4,8 @@ use strict;
 use warnings;
 
 use lib 'lib';
-use VLDAP::Server;
+use LDAP::Virtual;
 
-VLDAP::Server->run({ port => 1389 });
+LDAP::Virtual->run({ port => 1389 });
 
 1;
diff --git a/lib/VLDAP/Server.pm b/lib/LDAP/Virtual.pm
similarity index 96%
rename from lib/VLDAP/Server.pm
rename to lib/LDAP/Virtual.pm
index 9e497ea..3b17bd4 100644
--- a/lib/VLDAP/Server.pm
+++ b/lib/LDAP/Virtual.pm
@@ -1,4 +1,4 @@
-package VLDAP::Server;
+package LDAP::Virtual;
 
 use strict;
 use warnings;
@@ -24,7 +24,7 @@ use Data::Dump qw/dump/;
 
 =head1 NAME
 
-VLDAP::Server
+LDAP::Virtual
 
 =cut
 
@@ -36,7 +36,7 @@ Provide LDAP server functionality somewhat similar to C<slapo-rwm>
 
 =head2 run
 
-  my $pid = VLDAP::Server->run({ port => 1389, fork => 0 });
+  my $pid = LDAP::Virtual->run({ port => 1389, fork => 0 });
 
 =cut
 
@@ -82,7 +82,7 @@ sub run {
 				# let's create a new socket
 				my $psock = $sock->accept;
 				$sel->add($psock);
-				$Handlers{*$psock} = VLDAP::Server->new($psock);
+				$Handlers{*$psock} = LDAP::Virtual->new($psock);
 			} else {
 				my $result = $Handlers{*$fh}->handle;
 				if ($result) {
@@ -98,7 +98,7 @@ sub run {
 
 =head2 stop
 
-  my $stopped_pids = VLDAP::Server->stop;
+  my $stopped_pids = LDAP::Virtual->stop;
 
 =cut
 
-- 
2.20.1