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.4 -r1.5 --- openacs-4/packages/acs-tcl/tcl/proxy-procs.tcl 17 Mar 2010 22:03:55 -0000 1.4 +++ openacs-4/packages/acs-tcl/tcl/proxy-procs.tcl 27 Oct 2014 16:40:07 -0000 1.5 @@ -31,7 +31,8 @@ return $return_string } - # Now rename exec - rename exec real_exec + # Now rename exec; protect cases, where file is loaded multiple times + if {[info commands ::real_exec] eq ""} {rename exec real_exec} + ad_proc exec {args} {This is the wrapped version of exec} {proxy::exec -call $args} }