Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
updated credits
  • Loading branch information
kraih committed Dec 14, 2011
1 parent f9047e5 commit 512732d
Show file tree
Hide file tree
Showing 3 changed files with 8 additions and 6 deletions.
1 change: 1 addition & 0 deletions Changes
Expand Up @@ -6,6 +6,7 @@ This file documents the revision history for Perl extension Mojolicious.
- Fixed memory leaks caused by named capture groups bug in Perl.
(plu, sri)
- Fixed small cleanup bug in Mojo::Asset::File.
- Fixed small multipart bug in Mojo::Message. (augensalat)

2.37 2011-12-10 00:00:00
- Welcome to the Mojolicious core team Marcus Ramberg, Glen Hinkle
Expand Down
2 changes: 2 additions & 0 deletions lib/Mojolicious.pm
Expand Up @@ -765,6 +765,8 @@ Ben van Staveren
Benjamin Erhart
Bernhard Graf
Breno G. de Oliveira
Brian Duggan
Expand Down
11 changes: 5 additions & 6 deletions t/mojo/request.t
Expand Up @@ -939,10 +939,10 @@ $req->parse("use strict;\n");
$req->parse("use warnings;\n\n");
$req->parse("print \"Hello World :)\\n\"\n");
$req->parse("\x0d\x0a------------0xKhTmLbOuNdArY--");
ok $req->is_finished, 'request is finished';
ok $req->is_finished, 'request is finished';
ok $req->is_multipart, 'no multipart content';
is $req->method, 'GET', 'right method';
is $req->version, '1.1', 'right version';
is $req->method, 'GET', 'right method';
is $req->version, '1.1', 'right version';
ok $req->at_least_version('1.0'), 'at least version 1.0';
ok !$req->at_least_version('1.2'), 'not version 1.2';
is $req->url, '/foo/bar/baz.html?foo13#23', 'right URL';
Expand All @@ -956,11 +956,10 @@ isa_ok $req->content->parts->[1], 'Mojo::Content::Single', 'right part';
isa_ok $req->content->parts->[2], 'Mojo::Content::Single', 'right part';
is $req->content->parts->[0]->asset->slurp, "hallo welt test123\n",
'right content';
is $req->body_params->to_hash->{text1}, "hallo welt test123\n",
'right value';
is $req->body_params->to_hash->{text1}, "hallo welt test123\n", 'right value';
is $req->body_params->to_hash->{text2}, '', 'right value';
is $req->body_params->to_hash->{upload}, undef, 'not a body parameter';
is $req->upload('upload')->filename, '0', 'right filename';
is $req->upload('upload')->filename, '0', 'right filename';
isa_ok $req->upload('upload')->asset, 'Mojo::Asset::Memory', 'right file';
is $req->upload('upload')->asset->size, 69, 'right size';

Expand Down

0 comments on commit 512732d

Please sign in to comment.