calendar.tcl

Go to the documentation of this file.
00001 /* ----------------------------------------------------------------------*/
00002 /* */
00003 /*  calendar.tcl --*/
00004 /* */
00005 /*  This file is the main 'package provide' script for the*/
00006 /*      'calendar' package.  The package provides various commands for*/
00007 /*  manipulating dates and times.*/
00008 /* */
00009 /*  RCS:$(@) $Id: calendar.tcl,v 1.5 2004/01/15 06:36:12 andreas_kupries Exp $*/
00010 
00011 package require Tcl 8.2
00012 
00013 namespace ::calendar {
00014 
00015     variable version 0.2
00016 
00017     variable home [file join [pwd] [file dirname [info script]]]
00018     if { [lsearch -exact $::auto_path $home] == -1 } {
00019     lappend ::auto_path $home
00020     }
00021 
00022     package provide [namespace tail [namespace current]] $version
00023 }
00024