[libcatalyst-plugin-subrequest-perl] 06/11: Remove no longer necessary patch to ensure backward compatibility

[Lucas Kanashiro]

This is an automated email from the git hooks/post-receive script.

kanashiro-guest pushed a commit to branch master
in repository libcatalyst-plugin-subrequest-perl.

commit ccd463db5e186226742295dedc4a88cc8efdab00
Author: Lucas Kanashiro <kanashiro.duarte at gmail.com>
Date:   Wed Aug 12 16:23:45 2015 -0300

    Remove no longer necessary patch to ensure backward compatibility
---
 debian/changelog             |  1 +
 debian/patches/Cat-5.9.patch | 40 ----------------------------------------
 debian/patches/series        |  1 -
 3 files changed, 1 insertion(+), 41 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index 6fd37a3..a2634dc 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -8,6 +8,7 @@ libcatalyst-plugin-subrequest-perl (0.21-1) UNRELEASED; urgency=medium
   [ Lucas Kanashiro ]
   * Add debian/upstream/metadata
   * Import upstream version 0.21
+  * Remove no longer necessary patch to ensure backward compatibility
 
  -- Lucas Kanashiro <kanashiro.duarte at gmail.com>  Wed, 12 Aug 2015 16:19:30 -0300
 
diff --git a/debian/patches/Cat-5.9.patch b/debian/patches/Cat-5.9.patch
deleted file mode 100644
index dae91c9..0000000
--- a/debian/patches/Cat-5.9.patch
+++ /dev/null
@@ -1,40 +0,0 @@
-Description: compatibility with Catalyst 5.9
- Taken from https://gist.github.com/jjn1056/9947765
-Author: John Napiorkowski
-Bug: https://rt.cpan.org/Public/Bug/Display.html?id=94392
-Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=747502
-
---- a/lib/Catalyst/Plugin/SubRequest.pm
-+++ b/lib/Catalyst/Plugin/SubRequest.pm
-@@ -102,18 +102,29 @@ sub sub_request_response {
- 
-   # need this so that
-   my $writer = Catalyst::Plugin::SubRequest::Writer->new;
--  my $response_cb = sub { $writer };
-+  my $response_cb = sub {
-+    my $response = shift;
-+    my ($status, $headers, $body) = @$response;
-+    if($body) {
-+      return;
-+    } else {
-+      return $writer;
-+    }
-+  };
-+
-   my $i_ctx = $class->prepare( env => $env, response_cb => $response_cb );
-   $i_ctx->stash($stash);
-   $i_ctx->dispatch;
-   $i_ctx->finalize;
-   $c->stats->profile( end => 'subrequest: ' . $path ) if $c->debug;
- 
--  $i_ctx->response->body($writer->body);
-+  if($writer->_is_closed) {
-+    $i_ctx->response->body($writer->body);
-+  }
- 
-   return $i_ctx->response;
- }
- 
- package Catalyst::Plugin::SubRequest::Writer;
- use Moose;
- has body => (
diff --git a/debian/patches/series b/debian/patches/series
deleted file mode 100644
index 2a6ebcc..0000000
--- a/debian/patches/series
+++ /dev/null
@@ -1 +0,0 @@
-Cat-5.9.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libcatalyst-plugin-subrequest-perl.git