From 03d2507e91d612ee3162b4524284e337943fec8e Mon Sep 17 00:00:00 2001
From: Oskari Okko Ojala <okko@frantic.com>
Date: Wed, 24 Oct 2012 13:11:21 +0300
Subject: [PATCH 1/3] Doc: Added Github URL to See Also.

---
 lib/Plack/Middleware/Deflater.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Plack/Middleware/Deflater.pm b/lib/Plack/Middleware/Deflater.pm
index ad37164..c093daa 100644
--- a/lib/Plack/Middleware/Deflater.pm
+++ b/lib/Plack/Middleware/Deflater.pm
@@ -200,6 +200,6 @@ Tatsuhiko Miyagawa
 
 =head1 SEE ALSO
 
-L<Plack>, L<http://httpd.apache.org/docs/2.2/en/mod/mod_deflate.html>
+L<Plack>, L<http://httpd.apache.org/docs/2.2/en/mod/mod_deflate.html>, L<https://github.com/miyagawa/Plack-Middleware-Deflater>
 
 =cut

From ab7dec8e1cacb79c9e6805a9900564319569a3a6 Mon Sep 17 00:00:00 2001
From: Oskari Okko Ojala <okko@frantic.com>
Date: Wed, 24 Oct 2012 13:18:30 +0300
Subject: [PATCH 2/3] Updated README via make

---
 README | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/README b/README
index 287867c..6e3ac48 100644
--- a/README
+++ b/README
@@ -67,5 +67,6 @@ AUTHOR
     Tatsuhiko Miyagawa
 
 SEE ALSO
-    Plack, <http://httpd.apache.org/docs/2.2/en/mod/mod_deflate.html>
+    Plack, <http://httpd.apache.org/docs/2.2/en/mod/mod_deflate.html>,
+    <https://github.com/miyagawa/Plack-Middleware-Deflater>
 

From 2ee8cea169929c63bd21ab29ac22a8ba92f857cf Mon Sep 17 00:00:00 2001
From: Oskari Okko Ojala <okko@frantic.com>
Date: Wed, 24 Oct 2012 13:20:52 +0300
Subject: [PATCH 3/3] Moved Compatibility code to
 Plack::Middleware::Deflater::Compat for easier use.

---
 lib/Plack/Middleware/Deflater.pm        | 18 +-----------------
 lib/Plack/Middleware/Deflater/Compat.pm | 22 ++++++++++++++++++++++
 2 files changed, 23 insertions(+), 17 deletions(-)
 create mode 100644 lib/Plack/Middleware/Deflater/Compat.pm

diff --git a/lib/Plack/Middleware/Deflater.pm b/lib/Plack/Middleware/Deflater.pm
index c093daa..8c944f9 100644
--- a/lib/Plack/Middleware/Deflater.pm
+++ b/lib/Plack/Middleware/Deflater.pm
@@ -122,23 +122,7 @@ Plack::Middleware::Deflater - Compress response body with Gzip or Deflate
   use Plack::Builder;
 
   builder {
-    enable sub {
-        my $app = shift;
-        sub {
-            my $env = shift;
-            my $ua = $env->{HTTP_USER_AGENT} || '';
-            # Netscape has some problem
-            $env->{"psgix.compress-only-text/html"} = 1 if $ua =~ m!^Mozilla/4!;
-            # Netscape 4.06-4.08 have some more problems
-             $env->{"psgix.no-compress"} = 1 if $ua =~ m!^Mozilla/4\.0[678]!;
-            # MSIE (7|8) masquerades as Netscape, but it is fine
-            if ( $ua =~ m!\bMSIE (?:7|8)! ) {
-                $env->{"psgix.no-compress"} = 0;
-                $env->{"psgix.compress-only-text/html"} = 0;
-            }
-            $app->($env);
-        }
-    };
+    enable 'Deflater::Compat'; # For browser compatibility
     enable "Deflater",
         content_type => ['text/css','text/html','text/javascript','application/javascript'],
         vary_user_agent => 1;
diff --git a/lib/Plack/Middleware/Deflater/Compat.pm b/lib/Plack/Middleware/Deflater/Compat.pm
new file mode 100644
index 0000000..6877fca
--- /dev/null
+++ b/lib/Plack/Middleware/Deflater/Compat.pm
@@ -0,0 +1,22 @@
+package Plack::Middleware::Deflater::Compat;
+use strict;
+use parent qw(Plack::Middleware);
+use Plack::Util;
+
+sub call {
+    my($self, $env) = @_;
+
+    my $ua = $env->{HTTP_USER_AGENT} || '';
+    # Netscape has some problem
+    $env->{"psgix.compress-only-text/html"} = 1 if $ua =~ m!^Mozilla/4!;
+    # Netscape 4.06-4.08 have some more problems
+    $env->{"psgix.no-compress"} = 1 if $ua =~ m!^Mozilla/4\.0[678]!;
+    # MSIE (7|8) masquerades as Netscape, but it is fine
+    if ( $ua =~ m!\bMSIE (?:7|8)! ) {
+	$env->{"psgix.no-compress"} = 0;
+	$env->{"psgix.compress-only-text/html"} = 0;
+    }
+    return $self->app->($env);
+}
+
+1;