Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -N -r1.485.2.30 -r1.485.2.31
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	19 Sep 2016 20:47:10 -0000	1.485.2.30
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	3 Nov 2016 10:50:56 -0000	1.485.2.31
@@ -3482,11 +3482,19 @@
         -actual_query [::xo::cc actual_query]
     $payload set package_id [my set package_id]
     if {[catch {$payload contains $cmd} errorMsg]} {
+
+      set errorCode $::errorCode
+      if {[ad_exception $errorCode] eq "ad_script_abort"} {
+        ad_return_complaint 1 [ns_quotehtml $errorMsg]
+      } else {
+        ad_log error "xowiki::Object set_payload: $errorMsg ($errorCode) in\n$cmd"
+      }
       ad_log error "content $cmd lead to error: $errorMsg"
       ::xo::clusterwide ns_cache flush xotcl_object_cache [my item_id]
+    } else {
+      #my log "call init mixins=[my info mixin]//[$payload info mixin]"
+      $payload init
     }
-    #my log "call init mixins=[my info mixin]//[$payload info mixin]"
-    $payload init
   }
   Object instproc get_payload {var {default ""}} {
     set payload [self]::payload