File: stl.tcl

package info (click to toggle)
tkinspect 5.1.6p10-6
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 488 kB
  • sloc: tcl: 3,504; makefile: 23
file content (17 lines) | stat: -rw-r--r-- 442 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
#
# $Id: stl.tcl,v 1.4 1995/06/04 08:06:54 sls Exp $
#
# Stl is my own tcl library.  It's not quite ready to be released.
# The stl-lite directory contains an extremely trimmed down version.
# This proc loads it.
#

proc stl_lite_init {} {
    global tkinspect_library
    foreach file {
	object.tcl filechsr.tcl simpleentry.tcl tk_util.tcl feedback.tcl
	tkhtml.tcl
    } {
	uplevel #0 [list source $tkinspect_library/stl-lite/$file]
    }
}