Index: openacs-4/packages/acs-tcl/tcl/proxy-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/proxy-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-tcl/tcl/proxy-procs.tcl	7 Aug 2017 23:47:59 -0000	1.6
+++ openacs-4/packages/acs-tcl/tcl/proxy-procs.tcl	17 Dec 2017 19:54:35 -0000	1.7
@@ -25,7 +25,7 @@
         @param cd  change to the given directory before executing the command
     } {
         set handle [ns_proxy get ExecPool]
-        with_finally -code {
+        ad_try {
             if {[info exists cd]} {
                 #
                 # We were requested to switch to a different
@@ -36,7 +36,7 @@
                 ns_proxy eval $handle [list cd $cd]
             }
             set return_string [ns_proxy eval $handle [list ::exec {*}$call]]
-        } -finally {
+        } finally {
             if {[info exists pwd]} {
                 #
                 # Switch back to the previous directory.