TclXMPP

Check-in [b43a753b78]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Always add the id attribute to outgoing IQ get or set stanzas.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:b43a753b78e16d5789c042b148e80b45daba4d71
User & Date: sgolovan 2015-12-20 19:45:11
Context
2015-12-21
16:35
Fixed the ::xmpp::roster::send routine to send only one item in jabber:iq:roster query (and actually send it). Bumped the xmpp::roster package version to 0.2. check-in: 81e700f03f user: sgolovan tags: trunk
2015-12-20
19:45
Always add the id attribute to outgoing IQ get or set stanzas. check-in: b43a753b78 user: sgolovan tags: trunk
2015-12-11
12:23
Implemented creating and parsing message processing hints (XEP-0334). Updated copyright years. check-in: 78613325ae user: sgolovan tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to ChangeLog.






1
2
3
4
5
6
7





2015-12-11  Sergei Golovan  <sgolovan@nes.ru>

	* xmpp/hints.tcl, xmpp/pkgIndex.tcl: Implemented creating and parsing
	  message processing hints (XEP-0334).

	* license.terms: Updated copyright years.

>
>
>
>
>







1
2
3
4
5
6
7
8
9
10
11
12
2015-12-20  Sergei Golovan  <sgolovan@nes.ru>

	* xmpp/xmpp.tcl: Always add the id attribute to outgoing IQ get or set
	  stanzas.

2015-12-11  Sergei Golovan  <sgolovan@nes.ru>

	* xmpp/hints.tcl, xmpp/pkgIndex.tcl: Implemented creating and parsing
	  message processing hints (XEP-0334).

	* license.terms: Updated copyright years.

Changes to xmpp/xmpp.tcl.

1763
1764
1765
1766
1767
1768
1769





1770
1771
1772
1773
1774
1775
1776
            after $timeout \
                  [namespace code [list abortIQ $xlib $attrs(id) timeout \
                                [xml::create error \
                                    -cdata [::msgcat::mc "IQ %s timed out" \
                                                         $attrs(id)]]]]
        }
    }






    set data [xml::create iq -attrs [array get attrs] \
                             -subelements $subelements]

    set res [outXML $xlib $data]

    if {[info exists cmd] && $res < 0} {







>
>
>
>
>







1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
            after $timeout \
                  [namespace code [list abortIQ $xlib $attrs(id) timeout \
                                [xml::create error \
                                    -cdata [::msgcat::mc "IQ %s timed out" \
                                                         $attrs(id)]]]]
        }
    }

    if {$getset && ![info exists attrs(id)]} {
        # The id attribute is mandatory
        set attrs(id) [packetID $xlib]
    }

    set data [xml::create iq -attrs [array get attrs] \
                             -subelements $subelements]

    set res [outXML $xlib $data]

    if {[info exists cmd] && $res < 0} {