release 0.004, hide Plack bits from PAUSE

[catagits/Web-Simple.git] / lib / Web / Simple / HackedPlack.pm

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;