Index: openacs-4/packages/xml-rpc/tcl/xml-rpc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xml-rpc/tcl/xml-rpc-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xml-rpc/tcl/xml-rpc-procs.tcl	26 Nov 2003 02:59:13 -0000	1.1
+++ openacs-4/packages/xml-rpc/tcl/xml-rpc-procs.tcl	14 Dec 2003 15:56:16 -0000	1.2
@@ -674,7 +674,8 @@
         set errno [catch {xmlrpc::invoke_method $method_name $arguments} result]
         if { $errno } {
             set result [xmlrpc::fault $errno $result]
-            ns_log error "xmlrpc_invoke: error in xmlrpc method REQUEST: $xml RESULT: $result"
+	    global errorInfo
+            ns_log error "xmlrpc_invoke: error in xmlrpc method REQUEST: $xml RESULT: $result\n$errorInfo"
         } else {
             # success
             set result [xmlrpc::respond $result]