Index: openacs-4/packages/xowf/tcl/xowf-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/xowf-procs.tcl,v
diff -u -N -r1.28.2.37 -r1.28.2.38
--- openacs-4/packages/xowf/tcl/xowf-procs.tcl	13 Aug 2020 14:38:59 -0000	1.28.2.37
+++ openacs-4/packages/xowf/tcl/xowf-procs.tcl	2 Sep 2020 10:52:33 -0000	1.28.2.38
@@ -1197,11 +1197,13 @@
     $package set object "[$package folder_path -parent_id [$object parent_id]][$object name]"
 
     #:log "call_action calls:   $package invoke -method edit -batch_mode 1 // obj=[$package set object]"
-    if {[catch {$package invoke -method edit -batch_mode 1} errorMsg]} {
-      :msg "---call_action returns error $errorMsg"
+    ad_try {
+      $package invoke -method edit -batch_mode 1
+    } on error {errorMsg} {
       ns_log error "$errorMsg\n$::errorInfo"
       error $errorMsg
     }
+
     #:log  "RESETTING package_id object"
     $package set object $last_object
     $package context $last_context