summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAki <please@ignore.pl>2020-08-06 20:49:30 +0200
committerAki <please@ignore.pl>2020-08-06 20:49:30 +0200
commited4063b53852cfd186970cf0ceb2379053720273 (patch)
treef9ffee710f413079559261e15ce56714a0d6cb09
parent7517212644c3978ef2c7bd0dc2d8a4dde88e7e42 (diff)
downloadbrowse-ed4063b53852cfd186970cf0ceb2379053720273.zip
browse-ed4063b53852cfd186970cf0ceb2379053720273.tar.gz
browse-ed4063b53852cfd186970cf0ceb2379053720273.tar.bz2
Changed viewhtml to use phttp to get images
-rwxr-xr-xviewhtml5
1 files changed, 3 insertions, 2 deletions
diff --git a/viewhtml b/viewhtml
index 8297020..cdb5ee3 100755
--- a/viewhtml
+++ b/viewhtml
@@ -70,8 +70,9 @@ proc displayNode {node tagList} {
} elseif {$tag == "img"} {
$w insert end "\n"
set lattr [array get $attributes]
- set path "$baseAddress/[lindex $lattr [expr [lsearch -exact $lattr src] + 1]]"
- image create photo $path -file $path
+ set path "$baseAddress[lindex $lattr [expr [lsearch -exact $lattr src] + 1]]"
+ set localPath [lindex [split [exec ./phttp $path] { }] 2]
+ image create photo $path -file $localPath
$w image create end -image $path
$w insert end "\n"
}