better base URL tests

mojolicious · Nov 25, 2012 · 26ae8d0 · 26ae8d0
1 parent 84b1d53
commit 26ae8d0
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/t/mojo/url.t b/t/mojo/url.t
@@ -203,14 +203,15 @@ is $rel->to_abs, 'http://kraih.com/a/b/c/d/index.html',
   'right absolute version';
 is $rel->to_abs->to_rel, 'c/d/index.html', 'right relative version';
 $url = Mojo::URL->new('/foo');
-ok !$url->base->is_abs, 'right base';
-ok $url->to_abs(Mojo::URL->new('http://kraih.com'))->base->is_abs,
+is $url->base, '', 'no base';
+is $url->to_abs(Mojo::URL->new('http://kraih.com'))->base, 'http://kraih.com',
   'right base';
 $url = Mojo::URL->new('http://kraih.com/foo');
-ok !$url->base->is_abs, 'right base';
-ok $url->to_rel(Mojo::URL->new('http://kraih.com'))->base->is_abs,
+is $url->base, '', 'no base';
+is $url->to_rel(Mojo::URL->new('http://kraih.com'))->base, 'http://kraih.com',
   'right base';
 
+
 # Relative path
 $url = Mojo::URL->new('http://kraih.com/foo/?foo=bar#23');
 $url->path('bar');