--- gorilla.tcl.orig	Thu Jul  1 01:17:19 2010
+++ gorilla.tcl	Thu Jul  1 01:17:40 2010
@@ -32,7 +32,7 @@ exec tclsh8.5 "$0" ${1+"$@"}
 package provide app-gorilla 1.0
 
 set ::gorillaVersion {$Revision: 1.5.3 $}
-set ::gorillaDir [file dirname [info script]]
+set ::gorillaDir "/usr/local/lib/password-gorilla"
 
 # ----------------------------------------------------------------------
 # Make sure that our prerequisite packages are available. Don't want
@@ -107,7 +107,7 @@ if {[tk windowingsystem] == "aqua"}	{
 # The pwsafe, blowfish, twofish and sha1 packages are in subdirectories
 #
 
-foreach subdir {sha1 blowfish twofish pwsafe itcl3.4 msgs} {
+foreach subdir {sha1 blowfish twofish pwsafe msgs} {
 	set testDir [file join $::gorillaDir $subdir]
 	if {[file isdirectory $testDir]} {
 		lappend auto_path $testDir
