From 60829d8cd9164d8b98327672c5363a301ae5dc39 Mon Sep 17 00:00:00 2001 From: Aki 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(-) (limited to 'viewhtml') 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