Index: openacs-4/packages/acs-admin/www/apm/packages/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/packages/index.vuh,v
diff -u -N -r1.2.28.1 -r1.2.28.2
--- openacs-4/packages/acs-admin/www/apm/packages/index.vuh	28 Sep 2013 12:10:01 -0000	1.2.28.1
+++ openacs-4/packages/acs-admin/www/apm/packages/index.vuh	28 Nov 2014 15:14:48 -0000	1.2.28.2
@@ -18,7 +18,7 @@
 			 where version_id = :version_id)
 } -default 0] } {
 
-    set file [ns_tmpnam]
+    set file [ad_tmpnam]
 
     db_blob_get_file apm_archive_serve {
 	select content 
Index: openacs-4/packages/assessment/www/asm-admin/export/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/export/index.vuh,v
diff -u -N -r1.10 -r1.10.6.1
--- openacs-4/packages/assessment/www/asm-admin/export/index.vuh	7 Oct 2007 22:36:54 -0000	1.10
+++ openacs-4/packages/assessment/www/asm-admin/export/index.vuh	28 Nov 2014 15:14:48 -0000	1.10.6.1
@@ -2,7 +2,7 @@
 
     Export an assessment in IMS QTI format
 
-    @author Natalia P�rez (nperper@it.uc3m.es)
+    @author Natalia Pérez (nperper@it.uc3m.es)
     @creation-date 2004-11-25
 } -query {
     {assessment_id:integer,optional}
@@ -28,20 +28,20 @@
 # convenient way to get the values out of a list
 foreach {assessment_id download_name} [split [ad_conn path_info] /] {break}
 
-ad_require_permission $assessment_id admin
+permission::require_permission -object_id $assessment_id -privilege admin
 
 # Get the assessment data
 as::assessment::data -assessment_id $assessment_id
 
 set assessment_id1 $assessment_data(assessment_rev_id)
 
 # publish the object to the file system
-set in_path [ns_tmpnam]
+set in_path [ad_tmpnam]
 file mkdir $in_path
 
 
 # create a temp dir to put the archive in
-set out_path [ns_tmpnam]
+set out_path [ad_tmpnam]
 file mkdir $out_path
 
 # First create our top-level document
Index: openacs-4/packages/evaluation/www/admin/evaluations/download-archive/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/evaluations/download-archive/index.vuh,v
diff -u -N -r1.3 -r1.3.8.1
--- openacs-4/packages/evaluation/www/admin/evaluations/download-archive/index.vuh	8 Aug 2006 21:26:42 -0000	1.3
+++ openacs-4/packages/evaluation/www/admin/evaluations/download-archive/index.vuh	28 Nov 2014 15:14:48 -0000	1.3.8.1
@@ -33,14 +33,14 @@
 regsub -all {[<>:\"|/@\\\#%&+\\]} $task_name {_} task_name
 
 # publish the object to the file system
-set in_path [ns_tmpnam]
+set in_path [ad_tmpnam]
 file mkdir $in_path
 
 set file [evaluation::public_answers_to_file_system -task_id $task_id -path $in_path -folder_name $task_name]
 set file_name [file tail $file]
 
 # create a temp dir to put the archive in
-set out_path [ns_tmpnam]
+set out_path [ad_tmpnam]
 file mkdir $out_path
 
 set out_file [file join ${out_path} ${download_name}]
Index: openacs-4/packages/file-storage/www/download-archive/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/download-archive/index.vuh,v
diff -u -N -r1.5.8.2 -r1.5.8.3
--- openacs-4/packages/file-storage/www/download-archive/index.vuh	29 Jul 2014 11:37:29 -0000	1.5.8.2
+++ openacs-4/packages/file-storage/www/download-archive/index.vuh	28 Nov 2014 15:14:48 -0000	1.5.8.3
@@ -35,14 +35,14 @@
 }
 
 # publish the object to the file system
-set in_path [ns_tmpnam]
+set in_path [ad_tmpnam]
 file mkdir $in_path
 
 set file [fs::publish_object_to_file_system -object_id $object_id -path $in_path -user_id $user_id]
 set file_name [file tail $file]
 
 # create a temp dir to put the archive in
-set out_path [ns_tmpnam]
+set out_path [ad_tmpnam]
 file mkdir $out_path
 
 set out_file [file join ${out_path} ${download_name}]