From 55597357c715484494bc7ef58ee36a6d0e5b63f6 Mon Sep 17 00:00:00 2001
From: Christian Schneider
Date: Thu, 17 Oct 2019 16:46:36 +0200
Subject: Fix ->is_reachable to use get() instead of fopen to use HTTP/1.1 and
 add tests

---
 test/it_url.t | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'test')

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
-- 
cgit v1.2.3