summary refs log tree commit diff
path: root/t/spore-request
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2010-11-05 16:25:26 +0100
committerfranck cuny <franck@lumberjaph.net>2010-11-05 16:25:26 +0100
commitfbe0876e7c8ab998a08e1eac6e7e72d92edeac10 (patch)
tree11a6fb1cddbc31134981cf8f0872f9e3cc674cab /t/spore-request
parenttypo (diff)
downloadnet-http-spore-fbe0876e7c8ab998a08e1eac6e7e72d92edeac10.tar.gz
remove two methods
Diffstat (limited to 't/spore-request')
-rw-r--r--t/spore-request/path_info.t27
-rw-r--r--t/spore-request/query_string.t25
2 files changed, 0 insertions, 52 deletions
diff --git a/t/spore-request/path_info.t b/t/spore-request/path_info.t
deleted file mode 100644
index 17645af..0000000
--- a/t/spore-request/path_info.t
+++ /dev/null
@@ -1,27 +0,0 @@
-use strict;
-use Test::More;
-
-use Net::HTTP::Spore::Request;
-
-my $env = {
-    REQUEST_METHOD  => 'GET',
-    SERVER_NAME     => 'localhost',
-    SERVER_PORT     => '80',
-    SCRIPT_NAME     => '',
-    PATH_INFO       => '/:database/:key',
-    REQUEST_URI     => '',
-    QUERY_STRING    => '',
-    SERVER_PROTOCOL => 'HTTP/1.0',
-    'spore.params'  => [qw/database test_spore key foo/],
-};
-
-ok my $request = Net::HTTP::Spore::Request->new($env);
-
-is $request->path_info, '/test_spore/foo';
-
-$env->{'spore.params'} = [qw/database test_spore key foo another key/];
-is $request->path_info, '/test_spore/foo';
-
-is $request->path, '/test_spore/foo';
-
-done_testing;
diff --git a/t/spore-request/query_string.t b/t/spore-request/query_string.t
deleted file mode 100644
index 2ee7979..0000000
--- a/t/spore-request/query_string.t
+++ /dev/null
@@ -1,25 +0,0 @@
-use strict;
-use Test::More;
-
-use Net::HTTP::Spore::Request;
-
-my $env = {
-    REQUEST_METHOD  => 'GET',
-    SERVER_NAME     => 'localhost',
-    SERVER_PORT     => '80',
-    SCRIPT_NAME     => '',
-    PATH_INFO       => '/:database',
-    REQUEST_URI     => '',
-    QUERY_STRING    => '',
-    SERVER_PROTOCOL => 'HTTP/1.0',
-    'spore.params'  => [qw/database test_spore key foo rev 123/],
-};
-
-ok my $request = Net::HTTP::Spore::Request->new($env);
-
-is $request->query_string, 'key=foo&rev=123';
-
-$env->{PATH_INFO} = '/:database/:key';
-is $request->query_string, 'rev=123';
-
-done_testing;