Index: openacs-4/packages/acs-admin/www/apm/version-i18n-export.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/version-i18n-export.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-admin/www/apm/version-i18n-export.tcl	16 Oct 2003 10:50:12 -0000	1.6
+++ openacs-4/packages/acs-admin/www/apm/version-i18n-export.tcl	22 Oct 2003 11:39:21 -0000	1.7
@@ -6,6 +6,7 @@
     @cvs-id $Id$  
 } {
     version_id:integer
+    {return_url {[export_vars -base "version-i18n-index" { version_id }]}}
 }
 
 db_1row package_version_info { 
@@ -14,13 +15,11 @@
     where  version_id = :version_id 
 }
 
-set return_url [export_vars -base "version-i18n-index" { version_id }]
-
 set page_title "Export Messages"
 set context [list \
                  [list "/acs-admin/apm/" "Package Manager"] \
                  [list [export_vars -base version-view { version_id }] "$pretty_name $version_name"] \
-                 [list $return_url "Internationalization"] $page_title]
+                 [list [export_vars -base "version-i18n-index" { version_id }] "Internationalization"] $page_title]
 
 set catalog_dir [lang::catalog::package_catalog_dir $package_key]