From dc74b0da8dbfa357fb53a79a1c9aa938619a2fc1 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Mon, 16 Jan 2006 17:29:45 +0000
Subject: [PATCH] moving into sub folders

---
 t/{FormGetName.t => Form/GetName.t}     |  4 ++--
 t/{FormListEquiv.t => Form/ListEquiv.t} |  4 ++--
 t/{help_compiled.t => Help/compiled.t}  |  4 ++--
 t/{help_related.t => Help/related.t}    |  4 ++--
 t/{help_toc.t => Help/toc.t}            |  4 ++--
 t/{i18n.t => i18n/label.t}              | 12 ++++++------
 6 files changed, 16 insertions(+), 16 deletions(-)
 rename t/{FormGetName.t => Form/GetName.t} (96%)
 rename t/{FormListEquiv.t => Form/ListEquiv.t} (99%)
 rename t/{help_compiled.t => Help/compiled.t} (95%)
 rename t/{help_related.t => Help/related.t} (96%)
 rename t/{help_toc.t => Help/toc.t} (95%)
 rename t/{i18n.t => i18n/label.t} (96%)

diff --git a/t/FormGetName.t b/t/Form/GetName.t
similarity index 96%
rename from t/FormGetName.t
rename to t/Form/GetName.t
index e88224e3f..3fca33254 100644
--- a/t/FormGetName.t
+++ b/t/Form/GetName.t
@@ -10,7 +10,7 @@
 
 # ---- BEGIN DO NOT EDIT ----
 use strict;
-use lib '../lib';
+use lib '../../lib';
 use Getopt::Long;
 use WebGUI::Form::FieldType;
 use WebGUI::Form::DynamicField;
@@ -67,7 +67,7 @@ sub initialize {
                 'configFile=s'=>\$configFile
         );
         exit 1 unless ($configFile);
-        my $session = WebGUI::Session->open("..",$configFile);
+        my $session = WebGUI::Session->open("../..",$configFile);
 }
 
 sub cleanup {
diff --git a/t/FormListEquiv.t b/t/Form/ListEquiv.t
similarity index 99%
rename from t/FormListEquiv.t
rename to t/Form/ListEquiv.t
index 3724329a0..d2d3ed128 100644
--- a/t/FormListEquiv.t
+++ b/t/Form/ListEquiv.t
@@ -10,7 +10,7 @@
 
 # ---- BEGIN DO NOT EDIT ----
 use strict;
-use lib '../lib';
+use lib '../../lib';
 use Getopt::Long;
 use WebGUI::Form::DynamicField;
 use WebGUI::Form::SelectList;
@@ -435,7 +435,7 @@ sub initialize {
                 'configFile=s'=>\$configFile
         );
         exit 1 unless ($configFile);
-        my $session = WebGUI::Session->open("..",$configFile);
+        my $session = WebGUI::Session->open("../..",$configFile);
 }
 
 sub cleanup {
diff --git a/t/help_compiled.t b/t/Help/compiled.t
similarity index 95%
rename from t/help_compiled.t
rename to t/Help/compiled.t
index 364ef15b8..b6e23cfd0 100644
--- a/t/help_compiled.t
+++ b/t/Help/compiled.t
@@ -10,7 +10,7 @@
 
 # ---- BEGIN DO NOT EDIT ----
 use strict;
-use lib '../lib';
+use lib '../../lib';
 use Getopt::Long;
 use WebGUI::Session;
 use WebGUI::Operation::Help;
@@ -54,7 +54,7 @@ sub initialize {
                 'configFile=s'=>\$configFile
         );
         exit 1 unless ($configFile);
-        return WebGUI::Session->open("..",$configFile);
+        return WebGUI::Session->open("../..",$configFile);
 }
 
 sub cleanup {
diff --git a/t/help_related.t b/t/Help/related.t
similarity index 96%
rename from t/help_related.t
rename to t/Help/related.t
index bce4389c0..e3a0bb7a9 100644
--- a/t/help_related.t
+++ b/t/Help/related.t
@@ -10,7 +10,7 @@
 
 # ---- BEGIN DO NOT EDIT ----
 use strict;
-use lib '../lib';
+use lib '../../lib';
 use Getopt::Long;
 use WebGUI::Session;
 use WebGUI::Operation::Help;
@@ -76,7 +76,7 @@ sub initialize {
                 'configFile=s'=>\$configFile
         );
         exit 1 unless ($configFile);
-        return WebGUI::Session->open("..",$configFile);
+        return WebGUI::Session->open("../..",$configFile);
 }
 
 sub cleanup {
diff --git a/t/help_toc.t b/t/Help/toc.t
similarity index 95%
rename from t/help_toc.t
rename to t/Help/toc.t
index 6c03cc42f..3d786f0f7 100644
--- a/t/help_toc.t
+++ b/t/Help/toc.t
@@ -10,7 +10,7 @@
 
 # ---- BEGIN DO NOT EDIT ----
 use strict;
-use lib '../lib';
+use lib '../../lib';
 use Getopt::Long;
 use WebGUI::Session;
 use WebGUI::Operation::Help;
@@ -52,7 +52,7 @@ sub initialize {
                 'configFile=s'=>\$configFile
         );
         exit 1 unless ($configFile);
-        return WebGUI::Session->open("..",$configFile);
+        return WebGUI::Session->open("../..",$configFile);
 }
 
 sub cleanup {
diff --git a/t/i18n.t b/t/i18n/label.t
similarity index 96%
rename from t/i18n.t
rename to t/i18n/label.t
index c65f71bd4..e9e7491ae 100644
--- a/t/i18n.t
+++ b/t/i18n/label.t
@@ -1,5 +1,5 @@
 #-------------------------------------------------------------------
-# WebGUI is Copyright 2001-2005 Plain Black Corporation.
+# WebGUI is Copyright 2001-2006 Plain Black Corporation.
 #-------------------------------------------------------------------
 # Please read the legal notices (docs/legal.txt) and the license
 # (docs/license.txt) that came with this distribution before using
@@ -10,7 +10,7 @@
 
 # ---- BEGIN DO NOT EDIT ----
 use strict;
-use lib '../lib';
+use lib '../../lib';
 use Text::Balanced qw(extract_codeblock);
 use Getopt::Long;
 use WebGUI::Operation::Help;
@@ -75,10 +75,10 @@ diag("Getting Help labels");
 #@sqlLabels = getSQLLabels();
 
 diag("Getting subroutine labels");
-find(\&label_finder_pm, '../lib/');
+find(\&label_finder_pm, '../../lib/');
 
 diag("Getting object labels");
-find(\&obj_finder_pm, '../lib/');
+find(\&obj_finder_pm, '../../lib/');
 
 diag ("Checking ". scalar(@helpLabels). " help labels");
 #diag ("Checking ". scalar(@sqlLabels). " SQL labels");
@@ -213,7 +213,7 @@ sub getHelpLabels {
 sub getSQLLabels {
 	my @sqlLabels = ();
 	foreach my $file (qw/create.sql previousVersion.sql/) {
-		my $file2 = join '/', '..', 'docs', $file;
+		my $file2 = join '/', '../..', 'docs', $file;
 		open my $fh, $file2 or
 			die "Unable to open $file2: $!\n";
 		local $/;
@@ -243,7 +243,7 @@ sub initialize {
                 'configFile=s'=>\$configFile
         );
         exit 1 unless ($configFile);
-        return WebGUI::Session->open("..",$configFile);
+        return WebGUI::Session->open("../..",$configFile);
 }
 
 sub cleanup {