emacs-jabber jabber-core.el,1.57,1.58

[Magnus H. <leg...@us...>]

Update of /cvsroot/emacs-jabber/emacs-jabber
In directory sc8-pr-cvs17:/tmp/cvs-serv28022

Modified Files:
	jabber-core.el 
Log Message:
Revision: ma...@fr...--2005/emacs-jabber--cvs-head--0--patch-388
Creator:  Magnus Henoch <ma...@fr...>

Tell the function that caused an error in jabber-process-input


Index: jabber-core.el
===================================================================
RCS file: /cvsroot/emacs-jabber/emacs-jabber/jabber-core.el,v
retrieving revision 1.57
retrieving revision 1.58
diff -u -d -r1.57 -r1.58
--- jabber-core.el	21 Aug 2007 23:27:45 -0000	1.57
+++ jabber-core.el	23 Aug 2007 17:15:38 -0000	1.58
@@ -770,7 +770,7 @@
       (condition-case e
 	  (funcall f jc xml-data)
 	((debug error)
-	 (fsm-debug-output "Error %S while processing %S" e xml-data))))))
+	 (fsm-debug-output "Error %S while processing %S with function %s" e xml-data f))))))
 
 (defun jabber-process-stream-error (xml-data state-data)
   "Process an incoming stream error.