diff options
Diffstat (limited to 'viewhtml')
| -rwxr-xr-x | viewhtml | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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" |