Skip to content

Commit

Permalink
use more realistic data in Mojo::URL tests
Browse files Browse the repository at this point in the history
  • Loading branch information
kraih committed May 7, 2013
1 parent ff4464a commit 501c637
Showing 1 changed file with 19 additions and 19 deletions.
38 changes: 19 additions & 19 deletions t/mojo/url.t
Expand Up @@ -97,26 +97,26 @@ is "$url", 'wss://sri:foobar@example.com:8080?_monkeybiz%3B=&_monkey=&23=#23',
'right format';

# No authority
$url = Mojo::URL->new('DATA:helloworld123');
is $url->scheme, 'DATA', 'right scheme';
is $url->protocol, 'data', 'right protocol';
is $url->userinfo, undef, 'no userinfo';
is $url->host, undef, 'no host';
is $url->port, undef, 'no port';
is $url->path, 'helloworld123', 'right path';
is $url->query, '', 'no query';
is $url->fragment, undef, 'no fragment';
is "$url", 'data:helloworld123', 'right format';
$url = Mojo::URL->new('DATA:image/png;base64,helloworld123');
is $url->scheme, 'DATA', 'right scheme';
is $url->protocol, 'data', 'right protocol';
is $url->userinfo, undef, 'no userinfo';
is $url->host, undef, 'no host';
is $url->port, undef, 'no port';
is $url->path, 'image/png;base64,helloworld123', 'right path';
is $url->query, '', 'no query';
is $url->fragment, undef, 'no fragment';
is "$url", 'data:image/png;base64,helloworld123', 'right format';
$url = $url->clone;
is $url->scheme, 'DATA', 'right scheme';
is $url->protocol, 'data', 'right protocol';
is $url->userinfo, undef, 'no userinfo';
is $url->host, undef, 'no host';
is $url->port, undef, 'no port';
is $url->path, 'helloworld123', 'right path';
is $url->query, '', 'no query';
is $url->fragment, undef, 'no fragment';
is "$url", 'data:helloworld123', 'right format';
is $url->scheme, 'DATA', 'right scheme';
is $url->protocol, 'data', 'right protocol';
is $url->userinfo, undef, 'no userinfo';
is $url->host, undef, 'no host';
is $url->port, undef, 'no port';
is $url->path, 'image/png;base64,helloworld123', 'right path';
is $url->query, '', 'no query';
is $url->fragment, undef, 'no fragment';
is "$url", 'data:image/png;base64,helloworld123', 'right format';
$url = Mojo::URL->new->parse('mailto:sri@example.com');
is $url->scheme, 'mailto', 'right scheme';
is $url->protocol, 'mailto', 'right protocol';
Expand Down

0 comments on commit 501c637

Please sign in to comment.