[Catalyst-commits] r11980 - trunk/Catalyst-Plugin-SubRequest/lib/Catalyst/Plugin

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-11-23 22:41:11 +0000 (Mon, 23 Nov 2009)
New Revision: 11980

Modified:
   trunk/Catalyst-Plugin-SubRequest/lib/Catalyst/Plugin/SubRequest.pm
Log:
Trim trailing space

Modified: trunk/Catalyst-Plugin-SubRequest/lib/Catalyst/Plugin/SubRequest.pm
===================================================================
--- trunk/Catalyst-Plugin-SubRequest/lib/Catalyst/Plugin/SubRequest.pm	2009-11-23 21:45:55 UTC (rev 11979)
+++ trunk/Catalyst-Plugin-SubRequest/lib/Catalyst/Plugin/SubRequest.pm	2009-11-23 22:41:11 UTC (rev 11980)
@@ -26,7 +26,7 @@
 
 =head1 METHODS
 
-=over 4 
+=over 4
 
 =item subreq [path as string or hash ref], [stash as hash ref], [parameters as hash ref]
 
@@ -36,7 +36,7 @@
 If the path is passed as a hash ref then it can include body, action, match and path.
 Any additional parameters are put into the stash.
 
-=back 
+=back
 
 =cut
 
@@ -80,17 +80,17 @@
     my $inner_ctx = $class->prepare;
 
     $inner_ctx->stash($stash || {});
-    
-    
+
+
     $c->stats->profile(
         begin   => 'subrequest: /' . $path,
         comment => '',
-    ) if ($c->debug); 
-        
+    ) if ($c->debug);
+
     $inner_ctx->dispatch;
 
     $c->stats->profile( end => 'subrequest: /' . $path ) if ($c->debug);
-    
+
     return $inner_ctx->response->body;
 }
 
@@ -127,7 +127,7 @@
 sub prepare {
     my ($self, $c) = @_;
     my $req = $c->request;
-    
+
     @{$req}{keys %{$self->{orig_request}}} = values %{$self->{orig_request}};
     while (my ($key,$value) = each %{$self->{request_mods}}) {
         if (my $mut = $req->can($key)) {