release 0.004, hide Plack bits from PAUSE

diff --git a/Changes b/Changes
index 0593105..e5242ca 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,8 @@
 Change log for Web::Simple
 
+0.004 - Thu Jul 08 2010 22:08 UTC
+  - Hide Plack Modules from PAUSE
+
 0.003 - Thu Jul 08 2010 14:48 UTC
   - Experimentally use $_[ENV] for the PSGI env
   - Add CSS::Declare

diff --git a/lib/Web/Simple.pm b/lib/Web/Simple.pm
index e74caad..797d96f 100644 (file)
--- a/lib/Web/Simple.pm
+++ b/lib/Web/Simple.pm
@@ -4,7 +4,7 @@ use strict;
 use warnings FATAL => 'all';
 use 5.008;
 
-our $VERSION = '0.003';
+our $VERSION = '0.004';
 
 sub setup_all_strictures {
   strict->import;

diff --git a/lib/Web/Simple/HackedPlack.pm b/lib/Web/Simple/HackedPlack.pm
index 89f4e01..84a77e1 100644 (file)
--- a/lib/Web/Simple/HackedPlack.pm
+++ b/lib/Web/Simple/HackedPlack.pm
@@ -7,17 +7,21 @@
 # So I thought perhaps I'd make it bricktext instead.
 #   -- love, mst
 
-package Plack::Server::CGI;
+# Hide from PAUSE
+package
+    Plack::Server::CGI;
 use strict;
 use warnings;
 use IO::Handle;
 BEGIN {
 
-    package Plack::Util;
+    # Hide from PAUSE
+    package
+        Plack::Util;
 
     sub foreach {
         my($body, $cb) = @_;
-    
+
         if (ref $body eq 'ARRAY') {
             for my $line (@$body) {
                 $cb->($line) if length $line;