Fix ->is_reachable to use get() instead of fopen to use HTTP/1.1 and add tests

1 files changed, 5 insertions, 0 deletions

diff --git a/test/it_url.t b/test/it_url.t
index 624b4bf..b265afa 100755
--- a/test/it_url.t
+++ b/test/it_url.t
@@ -118,13 +118,18 @@ is(
 
 
 $url = new it_url('http://www.gna.ch/');
+is((bool)$url->is_reachable(), true, "is_reachable($url->url)");
 $page = $url->get();
 ok(
 	strpos($page, '</html>'), # UTF8SAFE
 	'$url->get with url in constructor'
 );
 
+$url = new it_url('http://www.search.ch/not_found');
+is((bool)$url->is_reachable(), false, "is_reachable($url->url)");
+
 $url = new it_url('http://bogus.url');
+is((bool)$url->is_reachable(), false, "is_reachable($url->url)");
 $page = $url->get('http://www.gna.ch/');
 ok(
 	strpos($page, '</html>'), # UTF8SAFE