Index: openacs-4/packages/acs-admin/www/apm/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/index.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/acs-admin/www/apm/index.tcl	8 Oct 2003 11:30:22 -0000	1.19
+++ openacs-4/packages/acs-admin/www/apm/index.tcl	31 Oct 2003 12:11:28 -0000	1.20
@@ -56,8 +56,8 @@
 set use_watches_p [expr ! [ad_parameter -package_id [ad_acs_kernel_id] PerformanceModeP request-processor 1]]
 
 set table_def {
-    { package_key "Key" "" "<td><a href=\"version-view?version_id=$version_id\">$package_key</a></td>" }
-    { pretty_name "Name" "" "<td><a href=\"version-view?version_id=$version_id\">$pretty_name</a></td>" }
+    { package_key "Key" "" "<td><a href=\"[export_vars -base version-view { version_id }]\">$package_key</a></td>" }
+    { pretty_name "Name" "" "<td><a href=\"[export_vars -base version-view { version_id }]\">$pretty_name</a></td>" }
     { version_name "Ver." "" "" }
     {
 	status "Status" "" {<td align=center>&nbsp;&nbsp;[eval {
Index: openacs-4/packages/acs-admin/www/apm/version-files.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-files.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/acs-admin/www/apm/version-files.tcl	17 Sep 2003 11:20:30 -0000	1.13
+++ openacs-4/packages/acs-admin/www/apm/version-files.tcl	31 Oct 2003 12:11:28 -0000	1.14
@@ -13,7 +13,7 @@
 set return_url "[ad_conn url]?[ad_conn query]"
 
 set page_title "Files"
-set context [list [list "/acs-admin/apm/" "Package Manager"] [list [export_vars -base version-view { version_id }] "$pretty_name $version_name"] $page_title]
+set context [list [list "../developer" "Developer's Administration"] [list "/acs-admin/apm/" "Package Manager"] [list [export_vars -base version-view { version_id }] "$pretty_name $version_name"] $page_title]
 
 append body "
 
Index: openacs-4/packages/acs-admin/www/apm/version-reload.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-reload.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-admin/www/apm/version-reload.tcl	13 Oct 2003 17:19:25 -0000	1.6
+++ openacs-4/packages/acs-admin/www/apm/version-reload.tcl	31 Oct 2003 12:11:28 -0000	1.7
@@ -10,9 +10,11 @@
     {return_url "index"}
 }
 
-set page_title "Reload a Package"
-set context [list [list "/acs-admin/apm/" "Package Manager"] $page_title]
+apm_version_info $version_id
 
+set page_title "Reload $pretty_name"
+set context [list [list "../developer" "Developer's Administration"] [list "/acs-admin/apm/" "Package Manager"] [list [export_vars -base version-view { version_id }] "$pretty_name $version_name"] $page_title]
+
 # files in $files.
 apm_mark_version_for_reload $version_id files
 
Index: openacs-4/packages/acs-admin/www/apm/version-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-view.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/acs-admin/www/apm/version-view.tcl	13 Oct 2003 17:10:07 -0000	1.16
+++ openacs-4/packages/acs-admin/www/apm/version-view.tcl	31 Oct 2003 12:11:28 -0000	1.17
@@ -116,7 +116,7 @@
 db_release_unused_handles
 
 set page_title "$pretty_name $version_name"
-set context [list [list "/acs-admin/apm/" "Package Manager"] $page_title]
+set context [list [list "../developer" "Developer's Administration"] [list "/acs-admin/apm/" "Package Manager"] $page_title]
 
 
 append body "