Avoid useless use of X warning
Dave Rolsky [Sun, 23 Jan 2011 21:15:15 +0000 (15:15 -0600)]
t/routes.t

index c90af4b..b0d03bb 100644 (file)
@@ -15,7 +15,7 @@ use HTTP::Request::Common qw( GET PUT POST DELETE );
         'GET request for /foo went to the right sub'
     );
 
-    request( GET '/foo', ( Accept => '*/*', ) );
+    request( GET '/foo', ( Accept => '*/*' ) );
 
     is(
         $MyApp1::Controller::C1::REQ{get_html}, 1,
@@ -82,7 +82,7 @@ use HTTP::Request::Common qw( GET PUT POST DELETE );
 }
 
 {
-    get('/chain1/42/chain2/84/baz/foo');
+    request( GET '/chain1/42/chain2/84/baz/foo' );
 
     is(
         $MyApp1::Controller::C1::REQ{chain1}, 42,
@@ -101,7 +101,7 @@ use HTTP::Request::Common qw( GET PUT POST DELETE );
 }
 
 {
-    get('/user/99');
+    request( GET '/user/99' );
 
     is(
         $MyApp1::Controller::C1::REQ{user}, 99,
@@ -115,7 +115,7 @@ use HTTP::Request::Common qw( GET PUT POST DELETE );
 }
 
 {
-    get('/thing/99');
+    request( GET '/thing/99' );
 
     is(
         $MyApp1::Controller::C1::REQ{thing}, 99,
@@ -129,7 +129,7 @@ use HTTP::Request::Common qw( GET PUT POST DELETE );
 }
 
 {
-    get('/normal');
+    request( GET '/normal' );
 
     is(
         $MyApp1::Controller::C1::REQ{normal}, 1,