/[webpac]/trunk/openisis/tcl/oitsrc
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /trunk/openisis/tcl/oitsrc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 237 - (hide annotations)
Mon Mar 8 17:43:12 2004 UTC (17 years, 7 months ago) by dpavlin
Original Path: openisis/current/tcl/oitsrc
File size: 308 byte(s)
initial import of openisis 0.9.0 vendor drop

1 dpavlin 237 #!/usr/bin/tclsh
2     # ^^^ shebang line only for vim to recognize the language :)
3     #
4     # $Id: oitsrc,v 1.1 2003/03/26 13:36:18 kripke Exp $
5     # sample oits startup file
6     #
7    
8     proc oitscb {} {
9     # puts "oitscb"
10     request do tag val {
11     puts "$tag $val"
12     if { 0 <= $tag } { session add $tag $val }
13     }
14     }
15    
16     puts "oitsrc done"

  ViewVC Help
Powered by ViewVC 1.1.26