[PATCH] testbot: Tweak the placement of the package POD documentation.

15 Mar 2018

Alway put it right after the package statement.

Signed-off-by: Francois Gouget <fgouget(a)codeweavers.com>
---
 testbot/lib/ObjectModel/BasicPropertyDescriptor.pm    |  4 ++--
 testbot/lib/ObjectModel/CGI/CollectionBlockForPage.pm |  4 ++--
 testbot/lib/ObjectModel/CGI/CollectionPage.pm         |  4 ++--
 testbot/lib/ObjectModel/CGI/FormPage.pm               |  4 ++--
 testbot/lib/ObjectModel/CGI/FreeFormPage.pm           |  4 ++--
 testbot/lib/ObjectModel/CGI/ItemPage.pm               |  4 ++--
 testbot/lib/ObjectModel/CGI/Page.pm                   |  4 ++--
 testbot/lib/WineTestBot/CGI/PageBase.pm               |  4 ++--
 testbot/lib/WineTestBot/CGI/Sessions.pm               | 15 +++++++++++----
 testbot/lib/WineTestBot/Engine/Events.pm              |  4 ++--
 testbot/lib/WineTestBot/Engine/Notify.pm              |  4 ++--
 11 files changed, 31 insertions(+), 24 deletions(-)

diff --git a/testbot/lib/ObjectModel/BasicPropertyDescriptor.pm b/testbot/lib/ObjectModel/BasicPropertyDescriptor.pm
index fd1979404..4c3382cb0 100644
--- a/testbot/lib/ObjectModel/BasicPropertyDescriptor.pm
+++ b/testbot/lib/ObjectModel/BasicPropertyDescriptor.pm
@@ -18,6 +18,8 @@
 
 use strict;
 
+package ObjectModel::BasicPropertyDescriptor;
+
 =head1 NAME
 
 ObjectModel::BasicPropertyDescriptor - Defines a basic property
@@ -28,8 +30,6 @@ This handles the boolean, a number and string columns.
 
 =cut
 
-package ObjectModel::BasicPropertyDescriptor;
-
 use ObjectModel::PropertyDescriptor;
 
 use vars qw(@ISA @EXPORT);
diff --git a/testbot/lib/ObjectModel/CGI/CollectionBlockForPage.pm b/testbot/lib/ObjectModel/CGI/CollectionBlockForPage.pm
index f890315ad..3dd8154a7 100644
--- a/testbot/lib/ObjectModel/CGI/CollectionBlockForPage.pm
+++ b/testbot/lib/ObjectModel/CGI/CollectionBlockForPage.pm
@@ -19,14 +19,14 @@
 
 use strict;
 
+package ObjectModel::CGI::CollectionBlockForPage;
+
 =head1 NAME
 
 ObjectModel::CGI::CollectionBlockForPage - Collection block for list pages
 
 =cut
 
-package ObjectModel::CGI::CollectionBlockForPage;
-
 use ObjectModel::CGI::CollectionBlock;
 
 use vars qw(@ISA @EXPORT);
diff --git a/testbot/lib/ObjectModel/CGI/CollectionPage.pm b/testbot/lib/ObjectModel/CGI/CollectionPage.pm
index 11f030091..e45b2a4a7 100644
--- a/testbot/lib/ObjectModel/CGI/CollectionPage.pm
+++ b/testbot/lib/ObjectModel/CGI/CollectionPage.pm
@@ -19,14 +19,14 @@
 
 use strict;
 
+package ObjectModel::CGI::CollectionPage;
+
 =head1 NAME
 
 ObjectModel::CGI::CollectionPage - Base class for list pages
 
 =cut
 
-package ObjectModel::CGI::CollectionPage;
-
 use ObjectModel::CGI::CollectionBlockForPage;
 use ObjectModel::CGI::Page;
 
diff --git a/testbot/lib/ObjectModel/CGI/FormPage.pm b/testbot/lib/ObjectModel/CGI/FormPage.pm
index 7489f8353..7669067f1 100644
--- a/testbot/lib/ObjectModel/CGI/FormPage.pm
+++ b/testbot/lib/ObjectModel/CGI/FormPage.pm
@@ -20,14 +20,14 @@
 
 use strict;
 
+package ObjectModel::CGI::FormPage;
+
 =head1 NAME
 
 ObjectModel::CGI::FormPage - Base class for web forms
 
 =cut
 
-package ObjectModel::CGI::FormPage;
-
 use ObjectModel::CGI::Page;
 
 use vars qw(@ISA @EXPORT);
diff --git a/testbot/lib/ObjectModel/CGI/FreeFormPage.pm b/testbot/lib/ObjectModel/CGI/FreeFormPage.pm
index 607fd7bd6..7af04c498 100644
--- a/testbot/lib/ObjectModel/CGI/FreeFormPage.pm
+++ b/testbot/lib/ObjectModel/CGI/FreeFormPage.pm
@@ -19,14 +19,14 @@
 
 use strict;
 
+package ObjectModel::CGI::FreeFormPage;
+
 =head1 NAME
 
 ObjectModel::CGI::FreeFormPage - Base class for unbound web forms
 
 =cut
 
-package ObjectModel::CGI::FreeFormPage;
-
 use ObjectModel::CGI::FormPage;
 
 use vars qw(@ISA @EXPORT);
diff --git a/testbot/lib/ObjectModel/CGI/ItemPage.pm b/testbot/lib/ObjectModel/CGI/ItemPage.pm
index a07f02be8..74ce14e32 100644
--- a/testbot/lib/ObjectModel/CGI/ItemPage.pm
+++ b/testbot/lib/ObjectModel/CGI/ItemPage.pm
@@ -20,14 +20,14 @@
 
 use strict;
 
+package ObjectModel::CGI::ItemPage;
+
 =head1 NAME
 
 ObjectModel::CGI::ItemPage - Base class for bound web forms
 
 =cut
 
-package ObjectModel::CGI::ItemPage;
-
 use URI::Escape;
 use ObjectModel::CGI::FormPage;
 
diff --git a/testbot/lib/ObjectModel/CGI/Page.pm b/testbot/lib/ObjectModel/CGI/Page.pm
index 50598bfa1..ff7e8487a 100644
--- a/testbot/lib/ObjectModel/CGI/Page.pm
+++ b/testbot/lib/ObjectModel/CGI/Page.pm
@@ -19,14 +19,14 @@
 
 use strict;
 
+package ObjectModel::CGI::Page;
+
 =head1 NAME
 
 ObjectModel::CGI::Page - Base class for web pages
 
 =cut
 
-package ObjectModel::CGI::Page;
-
 use CGI;
 
 use vars qw(@ISA @EXPORT $PageBaseCreator);
diff --git a/testbot/lib/WineTestBot/CGI/PageBase.pm b/testbot/lib/WineTestBot/CGI/PageBase.pm
index 14900904f..fa383c512 100644
--- a/testbot/lib/WineTestBot/CGI/PageBase.pm
+++ b/testbot/lib/WineTestBot/CGI/PageBase.pm
@@ -20,14 +20,14 @@
 
 use strict;
 
+package WineTestBot::CGI::PageBase;
+
 =head1 NAME
 
 WineTestBot::CGI::PageBase - Base class for web pages
 
 =cut
 
-package WineTestBot::CGI::PageBase;
-
 use Apache2::Const -compile => qw(REDIRECT);
 use Apache2::ServerRec;
 use CGI::Cookie;
diff --git a/testbot/lib/WineTestBot/CGI/Sessions.pm b/testbot/lib/WineTestBot/CGI/Sessions.pm
index f9f791dd4..4b1f6b3c4 100644
--- a/testbot/lib/WineTestBot/CGI/Sessions.pm
+++ b/testbot/lib/WineTestBot/CGI/Sessions.pm
@@ -19,14 +19,14 @@
 
 use strict;
 
-=head1 NAME
 
-WineTestBot::CGI::Sessions - Session collection
+package WineTestBot::CGI::Session;
 
-=cut
+=head1 NAME
 
+WineTestBot::CGI::Session - A web user's session
 
-package WineTestBot::CGI::Session;
+=cut
 
 use WineTestBot::Utils;
 use WineTestBot::WineTestBotObjects;
@@ -44,8 +44,15 @@ sub InitializeNew($$)
   $self->Permanent(!1);
 }
 
+
 package WineTestBot::CGI::Sessions;
 
+=head1 NAME
+
+WineTestBot::CGI::Sessions - A Session collection
+
+=cut
+
 use CGI::Cookie;
 use ObjectModel::BasicPropertyDescriptor;
 use ObjectModel::ItemrefPropertyDescriptor;
diff --git a/testbot/lib/WineTestBot/Engine/Events.pm b/testbot/lib/WineTestBot/Engine/Events.pm
index 36895f418..c3ebe9baf 100644
--- a/testbot/lib/WineTestBot/Engine/Events.pm
+++ b/testbot/lib/WineTestBot/Engine/Events.pm
@@ -19,14 +19,14 @@
 
 use strict;
 
+package WineTestBot::Engine::Events;
+
 =head1 NAME
 
 WineTestBot::Engine::Events - Engine events
 
 =cut
 
-package WineTestBot::Engine::Events;
-
 use vars qw (@ISA @EXPORT);
 
 require Exporter;
diff --git a/testbot/lib/WineTestBot/Engine/Notify.pm b/testbot/lib/WineTestBot/Engine/Notify.pm
index 5ae663426..c277f7aa9 100644
--- a/testbot/lib/WineTestBot/Engine/Notify.pm
+++ b/testbot/lib/WineTestBot/Engine/Notify.pm
@@ -19,14 +19,14 @@
 
 use strict;
 
+package WineTestBot::Engine::Notify;
+
 =head1 NAME
 
 WineTestBot::Engine::Notify - Engine notification
 
 =cut
 
-package WineTestBot::Engine::Notify;
-
 use Socket;
 use WineTestBot::Config;
 
-- 
2.16.1

    

Francois Gouget

tags

participants (1)