You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
32 lines
1.1 KiB
Tcl
32 lines
1.1 KiB
Tcl
15 years ago
|
#
|
||
|
# iwidgets.tcl
|
||
|
# ----------------------------------------------------------------------
|
||
|
# Invoked automatically by [incr Tk] upon startup to initialize
|
||
|
# the [incr Widgets] package.
|
||
|
# ----------------------------------------------------------------------
|
||
|
# AUTHOR: Mark L. Ulferts EMAIL: mulferts@spd.dsccc.com
|
||
|
#
|
||
|
# @(#) $Id: iwidgets.tcl.in,v 1.3 2001/08/07 19:56:47 smithc Exp $
|
||
|
# ----------------------------------------------------------------------
|
||
|
# Copyright (c) 1995 Mark L. Ulferts
|
||
|
# ======================================================================
|
||
|
# See the file "license.terms" for information on usage and
|
||
|
# redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
|
||
|
|
||
|
package require Tcl 8.0
|
||
|
package require Tk 8.0
|
||
|
package require Itcl 3.2
|
||
|
package require Itk 3.2
|
||
|
|
||
|
namespace eval ::iwidgets {
|
||
|
namespace export *
|
||
|
|
||
|
variable library [file dirname [info script]]
|
||
|
variable version 4.0.1
|
||
|
}
|
||
|
|
||
|
lappend auto_path $iwidgets::library \
|
||
|
[file join $iwidgets::library generic] \
|
||
|
[file join $iwidgets::library scripts]
|
||
|
package provide Iwidgets $iwidgets::version
|