package require Tkhtml package require http pack [scrollbar .v -o v -co {.h yv}] -s right -f y pack [html .h -ys {.v set}] -f both -e 1 bind .h.x <1> {eval g [.h href %x %y]} proc g u { set t [http::geturl $u] .h cl .h p [http::data $t] http::cleanup $t .h co -base $u } g http://wiki.tcl.tk/976 proc bgerror args {} # NEM :-)