new tclX-based startup
[ircbot] / blight-startup.tcl
CommitLineData
b31f054e
IJ
1#!/usr/bin/tcl -f
2source blight.tcl
3set tcl_prompt1 { puts -nonewline "% " }
4set tcl_prompt2 { puts -nonewline "> " }
5commandloop -async -interactive on
6mainloop