Index: openacs-4/packages/acs-admin/www/apm/package-load-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/package-load-2.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/acs-admin/www/apm/package-load-2.tcl 13 Mar 2001 22:59:26 -0000 1.1 +++ openacs-4/packages/acs-admin/www/apm/package-load-2.tcl 17 Nov 2001 10:37:00 -0000 1.2 @@ -27,7 +27,7 @@ file delete -force [apm_workspace_install_dir] } -ns_write "[apm_header -form "package-load" [list "package-load" "Load a New Package"] "View Package Contents"] +ad_return_top_of_page "[apm_header -form "package-load" [list "package-load" "Load a New Package"] "View Package Contents"] " if {[empty_string_p $file_path]} { Index: openacs-4/packages/acs-admin/www/apm/packages-install.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/packages-install.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-admin/www/apm/packages-install.tcl 18 Oct 2001 21:06:09 -0000 1.5 +++ openacs-4/packages/acs-admin/www/apm/packages-install.tcl 17 Nov 2001 10:37:00 -0000 1.6 @@ -10,8 +10,7 @@ {install_path [apm_workspace_install_dir]} } - -ns_write "[apm_header "Package Installation"] +ad_return_top_of_page "[apm_header "Package Installation"]
Please wait while the installer loads ........
" Index: openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl 13 Mar 2001 22:59:26 -0000 1.1 +++ openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl 17 Nov 2001 10:37:00 -0000 1.2 @@ -6,8 +6,7 @@ } { } -ReturnHeaders -ns_write "[apm_header "Generate Package Specifications"] +ad_return_top_of_page "[apm_header "Generate Package Specifications"] Regenerating all package specifications for locally maintained packages. @@ -42,4 +41,4 @@ Return to the Package Manager -[ad_footer]" \ No newline at end of file +[ad_footer]"