X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FTak%2FRequest.pm;fp=lib%2FTak%2FRequest.pm;h=2ba8262358821aa02bdeb2f6578672521933ec1d;hb=ca30c15e4b434c7ba6dbe61ed2df9125806d93ab;hp=669e02727f813361389c5f9e5dac371b20cc8732;hpb=799b77f3fc1fa536b274a8e976b3c8351c45ad97;p=scpubgit%2FTak.git

diff --git a/lib/Tak/Request.pm b/lib/Tak/Request.pm
index 669e027..2ba8262 100644
--- a/lib/Tak/Request.pm
+++ b/lib/Tak/Request.pm
@@ -6,9 +6,11 @@ has tag => (is => 'ro', required => 1);
 
 has respond_to => (is => 'ro', required => 1, weak_ref => 1);
 
+has respond_with => (is => 'ro', required => 1);
+
 sub respond {
   my $self = shift;
-  $self->respond_to->send_response($self->tag => @_);
+  $self->respond_to->${\$self->respond_with}($self->tag => @_);
 }
 
 1;