flesh out and publically document the cli API of Web::Simple::Application
[catagits/Web-Simple.git] / t / request_mode_heuristics.t
index 848a22e..51b469a 100644 (file)
@@ -17,8 +17,7 @@ sub run {
     no warnings 'redefine';
     local *Web::Simple::Application::_run_fcgi             = sub { $res = "fcgi" };
     local *Web::Simple::Application::_run_cgi              = sub { $res = "cgi" };
-    local *Web::Simple::Application::_run_cli              = sub { $res = "cli" };
-    local *Web::Simple::Application::_run_cli_test_request = sub { $res = "test" };
+    local *Web::Simple::Application::run_cli               = sub { $res = "cli" };
     use strictures;
 
     {