From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 29 May 2008 20:28:58 +0000 (+0000)
Subject: add version numbers to versionless modules
X-Git-Tag: 3.21~14
X-Git-Url: http://git.shiar.nl/perl/plp/.git/commitdiff_plain/b485fa6bb934e79d44a1be1b5e41e31f4e7129b1

add version numbers to versionless modules
---

diff --git a/Changes b/Changes
index f02aa32..78da9d1 100644
--- a/Changes
+++ b/Changes
@@ -1,4 +1,4 @@
-- All modules use warnings
+- All modules use warnings and contain a $VERSION
 - Fix META.yml syntax
 
 3.20 - May 29, 2008:
diff --git a/lib/PLP/Fields.pm b/lib/PLP/Fields.pm
index 01f3baf..cd68e36 100644
--- a/lib/PLP/Fields.pm
+++ b/lib/PLP/Fields.pm
@@ -3,6 +3,8 @@ package PLP::Fields;
 use strict;
 use warnings;
 
+our $VERSION = '1.00';
+
 # Has only one function: doit(), which ties the hashes %get, %post, %fields
 # and %header in PLP::Script. Also generates %cookie immediately.
 sub doit {
diff --git a/lib/PLP/Functions.pm b/lib/PLP/Functions.pm
index 18318ad..90ff741 100644
--- a/lib/PLP/Functions.pm
+++ b/lib/PLP/Functions.pm
@@ -6,6 +6,7 @@ use warnings;
 use Exporter qw(import);
 use Fcntl qw(:flock);
 
+our $VERSION = '1.00';
 our @EXPORT = qw/Entity DecodeURI EncodeURI Include include PLP_END
                  AddCookie ReadFile WriteFile AutoURL Counter exit/;
 
diff --git a/lib/PLP/Tie/Delay.pm b/lib/PLP/Tie/Delay.pm
index 8be53af..0a2a0d5 100644
--- a/lib/PLP/Tie/Delay.pm
+++ b/lib/PLP/Tie/Delay.pm
@@ -4,6 +4,8 @@ use strict;
 no strict 'refs';
 use warnings;
 
+our $VERSION = '1.00';
+
 =head1 PLP::Tie::Delay
 
 Delays hash generation. Unties the hash on first access, and replaces it by the generated one.
diff --git a/lib/PLP/Tie/Headers.pm b/lib/PLP/Tie/Headers.pm
index ef12491..c675f8a 100644
--- a/lib/PLP/Tie/Headers.pm
+++ b/lib/PLP/Tie/Headers.pm
@@ -4,6 +4,8 @@ use strict;
 use warnings;
 use Carp;
 
+our $VERSION = '1.00';
+
 =head1 PLP::Tie::Headers
 
 Makes a hash case insensitive, and sets some headers. <_> equals <->, so C<$foo{CONTENT_TYPE}> is
diff --git a/lib/PLP/Tie/Print.pm b/lib/PLP/Tie/Print.pm
index a2d22dd..85788af 100644
--- a/lib/PLP/Tie/Print.pm
+++ b/lib/PLP/Tie/Print.pm
@@ -3,6 +3,8 @@ package PLP::Tie::Print;
 use strict;
 use warnings;
 
+our $VERSION = '1.00';
+
 =head1 PLP::Tie::Print
 
 Just prints to stdout, but sends headers if not sent before.