From 9dca05999d355deb225938ba4f57858ca27ca130 Mon Sep 17 00:00:00 2001 From: Aki Date: Sat, 24 Jul 2021 23:10:47 +0200 Subject: Utilities now assume they are available in PATH --- viewhtml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'viewhtml') diff --git a/viewhtml b/viewhtml index 1e581ec..be7f5f9 100755 --- a/viewhtml +++ b/viewhtml @@ -53,7 +53,7 @@ proc click {w x y} { global baseAddress set range [$w tag prevrange href [$w index @$x,$y]] set address [eval $w get $range] - set result [exec ./browse -f ./viewhtml [makeAddress $address]] + set result [exec browse -f viewhtml [makeAddress $address]] if {[llength $result] == 2} { displayPage $w [lindex $result 0] [lindex $result 1] } @@ -72,7 +72,7 @@ proc displayNode {w node tagList} { $w insert end "\n" set lattr [array get $attributes] set path [makeAddress [lindex $lattr [expr [lsearch -exact $lattr src] + 1]]] - set localPath [lindex [split [exec ./phttp $path] { }] 2] + set localPath [lindex [split [exec phttp $path] { }] 2] image create photo $path -file $localPath $w image create end -image $path $w insert end "\n" -- cgit v1.1