From: Marco v. d. H. <mar...@xs...> - 2005-10-17 18:35:44
|
Hi, I try to implement an embedded httpd, by using solely Direct_Url's. A peace of the code: if { $Interactief == "Ja" } { lappend auto_path "$WorkDirectory/../tcl/lib" package require httpd package require httpd::version package require httpd::direct package require httpd::url package require httpd::threadmgr Httpd_Server 80 127.0.0.1 Direct_Url /testje testje } proc testje {} { return "<html>\nDit is een testje <BR>\n</html>\n" } And of course there is a Tcl event loop. What am I forgetting? Thanks for your thoughts! :-) Marco |