Index: openacs-4/packages/acs-admin/www/apm/version-callbacks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-callbacks.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-admin/www/apm/version-callbacks.tcl	29 Jan 2003 15:53:23 -0000	1.1
+++ openacs-4/packages/acs-admin/www/apm/version-callbacks.tcl	31 Jan 2003 13:12:48 -0000	1.2
@@ -9,8 +9,8 @@
 
 db_1row package_version_info "select pretty_name, version_name from apm_package_version_info where version_id = :version_id"
 
-set page_title "Tcl Callbacks for $pretty_name $version_name"
-set context_bar [ad_context_bar [list "version-view?version_id=$version_id" "$pretty_name $version_name"] $page_title]
+set page_title "Tcl Callbacks"
+set context_bar [ad_context_bar [list "version-view?[export_vars { version_id }]" "$pretty_name $version_name"] $page_title]
 
 db_multirow callbacks get_all_callbacks {
     select type,