From 60829d8cd9164d8b98327672c5363a301ae5dc39 Mon Sep 17 00:00:00 2001
From: Aki <please@ignore.pl>
Date: Wed, 12 Aug 2020 02:11:03 +0200
Subject: Added support for same window opening through opener and browse in
 html view

---
 viewhtml | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/viewhtml b/viewhtml
index 82dcac1..b56b6ac 100755
--- a/viewhtml
+++ b/viewhtml
@@ -54,9 +54,10 @@ proc click {w x y} {
 	global baseAddress
 	set range [$w tag prevrange href [$w index @$x,$y]]
 	set address [eval $w get $range]
-	set presult [exec "./phttp" [makeAddress $address]]
-	displayPage $w [lindex $presult 1] [lindex $presult 2]
-	# TODO: In the end it must go through browse and opener anyway, to resolve the protocol and mime.
+	set result [exec ./browse -f ./viewhtml [makeAddress $address]]
+	if {[llength $result] == 2} {
+		displayPage $w [lindex $result 0] [lindex $result 1]
+	}
 }
 
 proc displayNode {w node tagList} {
-- 
cgit v1.1