Average rating:
set baseurl http://161.106.108.50/hecl/start.hcl
proc websource {url} {
upeval [http $url]
}
proc main {} {
global baseurl
set main [form label "HeclBrowser" code {
string "Fetching page $baseurl ..."
}]
setcurrent $main
}
main
websource $baseurl