#============================================================================== # Mentry package index file. # # Copyright (c) 1999-2004 Csaba Nemethi (E-mail: csaba.nemethi@t-online.de) #============================================================================== if {[string compare $::tcl_platform(platform) "macintosh"] == 0} { # # We need to do this here instead of in mentry.tcl, because of # a bug in [info script] in some Tcl releases for the Macintosh. # namespace eval mentry {} set mentry::library $dir } package ifneeded Mentry 2.8 [list source [file join $dir mentry.tcl]] package ifneeded mentry 2.8 [list source [file join $dir mentry.tcl]]