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 -N -r1.45.2.16 -r1.45.2.17
--- openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl	25 Apr 2023 14:22:24 -0000	1.45.2.16
+++ openacs-4/packages/acs-tcl/tcl/apm-file-procs.tcl	25 Apr 2023 14:24:47 -0000	1.45.2.17
@@ -135,6 +135,8 @@
     package require tar
     ::tar::untar $rfd -chan -dir $dir
 
+    close $rfd
+
     file delete -- $apm_file
 }