X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestCGIBin%2FController%2FCGIHandler.pm;h=ced6e59eafb40696d4cffacd131d06ae270dae53;hb=d5ba2ab2046dc314890bc7d3c2f9185f605d9f85;hp=3a7409f65990c30c812e6b08f2dbaf79f191c606;hpb=fbaba9ddb929f1437ddaec1f24019f38beb99c75;p=catagits%2FCatalyst-Controller-WrapCGI.git

diff --git a/t/lib/TestCGIBin/Controller/CGIHandler.pm b/t/lib/TestCGIBin/Controller/CGIHandler.pm
index 3a7409f..ced6e59 100644
--- a/t/lib/TestCGIBin/Controller/CGIHandler.pm
+++ b/t/lib/TestCGIBin/Controller/CGIHandler.pm
@@ -2,17 +2,18 @@ package TestCGIBin::Controller::CGIHandler;
 
 use parent 'Catalyst::Controller::CGIBin';
 
+# Turn off log for the non-zero exit test
+sub auto : Private {
+    my ($self, $c) = @_;
+    $c->log->levels() unless $c->debug;
+    1;
+}
+
 sub cgi_path {
     my ($self, $cgi) = @_;
     return "my-bin/$cgi";
 }
 
-# try out a forward
-sub dongs : Local Args(0) {
-    my ($self, $c) = @_;
-    $c->forward('/cgihandler/CGI_path__test_pl');
-}
-
 # try resolved forward
 sub mtfnpy : Local Args(0) {
     my ($self, $c) = @_;