Added $VERSION variable and ChangeLog file

Makes CPAN users happy

8 files changed, 13 insertions, 1 deletions

diff --git a/ChangeLog b/ChangeLog
new file mode 100644
index 0000000..6e47d3e
--- /dev/null
+++ b/ChangeLog
@@ -0,0 +1,3 @@
+0.1 -
+	Initial version
+
diff --git a/MANIFEST b/MANIFEST
index 17a417d..3393ba2 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -1,5 +1,6 @@
 Build.PL
 COPYING
+ChangeLog
 examples/multifile.pl
 examples/MyWebsite/ErrorPages.pm
 examples/MyWebsite/InfoDump.pm
diff --git a/lib/TUWF.pm b/lib/TUWF.pm
index 3716b92..67ae6a3 100644
--- a/lib/TUWF.pm
+++ b/lib/TUWF.pm
@@ -7,6 +7,9 @@ use strict;
 use warnings;
 use Carp 'croak';
 
+our $VERSION = '0.1';
+
+
 # Store the object in a global variable for some functions that don't get it
 # passed as an argument. This will break when:
 #  - using a threaded environment (threading sucks anyway)
diff --git a/lib/TUWF/DB.pm b/lib/TUWF/DB.pm
index 24ff42e..96b7c89 100644
--- a/lib/TUWF/DB.pm
+++ b/lib/TUWF/DB.pm
@@ -4,8 +4,9 @@ package TUWF::DB;
 use strict;
 use warnings;
 use Carp 'croak';
-
 use Exporter 'import';
+
+our $VERSION = '0.1';
 our @EXPORT = qw|
   dbInit dbh dbCheck dbDisconnect dbCommit dbRollBack
   dbExec dbRow dbAll dbPage
diff --git a/lib/TUWF/Misc.pm b/lib/TUWF/Misc.pm
index aab42f7..f7d5906 100644
--- a/lib/TUWF/Misc.pm
+++ b/lib/TUWF/Misc.pm
@@ -11,6 +11,7 @@ use Encode 'encode_utf8';
 use Scalar::Util 'looks_like_number';
 
 
+our $VERSION = '0.1';
 our @EXPORT = ('formValidate', 'mail');
 our @EXPORT_OK = ('uri_escape', 'kv_validate');
 
diff --git a/lib/TUWF/Request.pm b/lib/TUWF/Request.pm
index b56ee6f..c1a9857 100644
--- a/lib/TUWF/Request.pm
+++ b/lib/TUWF/Request.pm
@@ -7,6 +7,7 @@ use Encode 'decode_utf8', 'encode_utf8';
 use Exporter 'import';
 use Carp 'croak';
 
+our $VERSION = '0.1';
 our @EXPORT = qw|
   reqInit reqGet reqPost reqParam reqUploadMIME reqUploadRaw reqSaveUpload
   reqCookie reqMethod reqHeader reqPath reqBaseURI reqURI reqHost reqIP
diff --git a/lib/TUWF/Response.pm b/lib/TUWF/Response.pm
index f3dfdb0..39eadad 100644
--- a/lib/TUWF/Response.pm
+++ b/lib/TUWF/Response.pm
@@ -8,6 +8,7 @@ use Exporter 'import';
 use POSIX 'strftime';
 
 
+our $VERSION = '0.1';
 our @EXPORT = qw|
   resInit resHeader resCookie resBuffer resFd resStatus resRedirect resNotFound resFinish
 |;
diff --git a/lib/TUWF/XML.pm b/lib/TUWF/XML.pm
index 17aab13..668ea5e 100644
--- a/lib/TUWF/XML.pm
+++ b/lib/TUWF/XML.pm
@@ -10,6 +10,7 @@ use Exporter 'import';
 use Carp 'carp', 'croak';
 
 
+our $VERSION = '0.1';
 our(@EXPORT_OK, %EXPORT_TAGS, @htmltags, @htmlexport, @xmlexport, %htmlbool, $OBJ);