You are viewing a plain text version of this content. The canonical link for it is here.
Posted to rivet-dev@tcl.apache.org by mx...@apache.org on 2010/04/22 15:13:32 UTC

svn commit: r936827 - in /tcl/rivet/trunk: ChangeLog rivet/init.tcl

Author: mxmanghi
Date: Thu Apr 22 13:13:32 2010
New Revision: 936827

URL: http://svn.apache.org/viewvc?rev=936827&view=rev
Log:
    * rivet/init.tcl: add to auto_path the directory where init.tcl is located, as this
    is also the directory for package Rivet


Modified:
    tcl/rivet/trunk/ChangeLog
    tcl/rivet/trunk/rivet/init.tcl

Modified: tcl/rivet/trunk/ChangeLog
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/ChangeLog?rev=936827&r1=936826&r2=936827&view=diff
==============================================================================
--- tcl/rivet/trunk/ChangeLog (original)
+++ tcl/rivet/trunk/ChangeLog Thu Apr 22 13:13:32 2010
@@ -1,3 +1,7 @@
+2010-04-22 Massimo Manghi <mx...@apache.org>
+    * rivet/init.tcl: add to auto_path the directory where init.tcl is located, as this
+    is also the directory for package Rivet
+
 2010-04-19 Massimo Manghi <mx...@apache.org>
     * tests/upload.[rvt|test]: fix upload message sent to server. The end boundary
 	went undetected and Rivet added it to the uploaded file. Thus the problem

Modified: tcl/rivet/trunk/rivet/init.tcl
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/rivet/init.tcl?rev=936827&r1=936826&r2=936827&view=diff
==============================================================================
--- tcl/rivet/trunk/rivet/init.tcl (original)
+++ tcl/rivet/trunk/rivet/init.tcl Thu Apr 22 13:13:32 2010
@@ -85,6 +85,11 @@ namespace eval ::Rivet {
 	    lappend auto_path ${pkgpath}$::tcl_version
 	}
 
+	## Likewise we have also to add to auto_path the directory containing 
+	## this script since it holds the pkgIndex.tcl file for package Rivet. 
+
+	set auto_path [linsert $auto_path 0 [file dirname [info script]]]
+
 	## This will allow users to create proc libraries and tclIndex files
 	## in the local directory that can be autoloaded.
 	## Perhaps this must go to the front of the list to allow the user



---------------------------------------------------------------------
To unsubscribe, e-mail: rivet-cvs-unsubscribe@tcl.apache.org
For additional commands, e-mail: rivet-cvs-help@tcl.apache.org