Index: openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl,v
diff -u -r1.45.2.11 -r1.45.2.12
--- openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl	26 Aug 2022 13:00:48 -0000	1.45.2.11
+++ openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl	26 Nov 2022 16:47:54 -0000	1.45.2.12
@@ -584,8 +584,7 @@
     }
 
     apm_callback_and_log $callback  "Extracting the .info file (<tt>$info_file</tt>)..."
-    set tmpdir [ad_tmpnam]
-    file mkdir $tmpdir
+    set tmpdir [ad_mktmpdir]
     exec [apm_gzip_cmd] -d -q -c -S .apm $file_path | [apm_tar_cmd] -xf - -C $tmpdir $info_file 2> [apm_dev_null]
 
     #exec sh -c "cd $tmpdir ; [apm_gzip_cmd] -d -q -c -S .apm $file_path | [apm_tar_cmd] xf - $info_file" 2> [apm_dev_null]