From 5601295b75f82401817b35387a9843a18a9ae357 Mon Sep 17 00:00:00 2001 From: "Martin M. Hunt" Date: Tue, 21 Jan 2003 20:42:51 +0000 Subject: imported itcl 3.2.1 --- itcl/iwidgets/iwidgets.tcl.in | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 itcl/iwidgets/iwidgets.tcl.in (limited to 'itcl/iwidgets/iwidgets.tcl.in') diff --git a/itcl/iwidgets/iwidgets.tcl.in b/itcl/iwidgets/iwidgets.tcl.in new file mode 100644 index 00000000000..93098c3b6b3 --- /dev/null +++ b/itcl/iwidgets/iwidgets.tcl.in @@ -0,0 +1,31 @@ +# +# 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$ +# ---------------------------------------------------------------------- +# 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 @ITCL_VERSION@ +package require Itk @ITCL_VERSION@ + +namespace eval ::iwidgets { + namespace export * + + variable library [file dirname [info script]] + variable version @VERSION@ +} + +lappend auto_path $iwidgets::library \ + [file join $iwidgets::library generic] \ + [file join $iwidgets::library scripts] +package provide Iwidgets $iwidgets::version -- cgit v1.2.1