chiark / gitweb /
16c3aa083c80926cff6f67c95351d0a6d6a17bd0
[ircbot] / blight-startup.tcl
1 #!/usr/bin/tclsh8.4
2 package require Tclx
3 source blight.tcl
4 set tcl_prompt1 { puts -nonewline "% " }
5 set tcl_prompt2 { puts -nonewline "> " }
6 commandloop -async -interactive on
7 mainloop