home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 June / PCWorld_2005-06_cd.bin / software / vyzkuste / firewally / firewally.exe / framework-2.3.exe / iwidgets.tcl < prev    next >
Text File  |  2003-09-01  |  1KB  |  32 lines
  1. #
  2. # iwidgets.tcl
  3. # ----------------------------------------------------------------------
  4. # Invoked automatically by [incr Tk] upon startup to initialize
  5. # the [incr Widgets] package.
  6. # ----------------------------------------------------------------------
  7. #  AUTHOR: Mark L. Ulferts               EMAIL: mulferts@spd.dsccc.com
  8. #
  9. #  @(#) $Id: iwidgets.tcl.in,v 1.3 2001/08/07 19:56:47 smithc Exp $
  10. # ----------------------------------------------------------------------
  11. #                Copyright (c) 1995  Mark L. Ulferts
  12. # ======================================================================
  13. # See the file "license.terms" for information on usage and
  14. # redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  15.  
  16. package require Tcl 8.0
  17. package require Tk 8.0
  18. package require Itcl 3.2
  19. package require Itk 3.2
  20.  
  21. namespace eval ::iwidgets {
  22.     namespace export *
  23.  
  24.     variable library [file dirname [info script]]
  25.     variable version 4.0.1
  26. }
  27.  
  28. lappend auto_path $iwidgets::library \
  29.           [file join $iwidgets::library generic] \
  30.           [file join $iwidgets::library scripts]
  31. package provide Iwidgets $iwidgets::version
  32.