[Tkabber-dev] [tclxmpp commit] r68 - trunk/xmpp

codesite-noreply at google.com codesite-noreply at google.com
Wed Dec 17 15:44:07 MSK 2008


Author: sgolovan
Date: Wed Dec 17 04:05:51 2008
New Revision: 68

Modified:
    trunk/xmpp/poll.tcl

Log:
	* xmpp/poll.tcl: Fixed return value for procedure which pushes text
	  to an XMPP server.


Modified: trunk/xmpp/poll.tcl
==============================================================================
--- trunk/xmpp/poll.tcl	(original)
+++ trunk/xmpp/poll.tcl	Wed Dec 17 04:05:51 2008
@@ -192,7 +192,7 @@
      upvar 0 $token state

      if {![info exists state(wait)]} {
-        return
+        return -1
      }

      switch -- $state(wait) {
@@ -200,6 +200,7 @@
          waiting       -
          disconnecting {
              # TODO
+            return -1
          }
          default {
              Poll $token $text


More information about the Tkabber-dev mailing list