diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-11-05 16:25:26 +0100 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-11-05 16:25:26 +0100 |
| commit | fbe0876e7c8ab998a08e1eac6e7e72d92edeac10 (patch) | |
| tree | 11a6fb1cddbc31134981cf8f0872f9e3cc674cab /t/spore-request/path_info.t | |
| parent | typo (diff) | |
| download | net-http-spore-fbe0876e7c8ab998a08e1eac6e7e72d92edeac10.tar.gz | |
remove two methods
Diffstat (limited to 't/spore-request/path_info.t')
| -rw-r--r-- | t/spore-request/path_info.t | 27 |
1 files changed, 0 insertions, 27 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; |
