--- apps/page.orig	Mon Oct 17 10:29:17 2011
+++ apps/page	Mon Oct 17 10:31:22 2011
@@ -26,6 +26,7 @@ package provide page 1.0
 
 lappend auto_path [file join [file dirname [file dirname [file normalize [info script]]]] modules]
 
+lappend auto_path [file join [lindex $tcl_pkgPath end] page]
 #lappend auto_path [file join [file dirname [info script]] .. modules]
 #source [file join [file dirname [info script]] .. modules struct tree.tcl]
 
