Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Show only users missing in roster when displaying add users dialog. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
80f5c7520a2da756c526df40d840fce8 |
| User & Date: | sgolovan 2016-01-25 11:32:33 |
Context
|
2016-01-25
| ||
| 11:35 | Don't show dialog if choices list is empty. check-in: d568a96941 user: sgolovan tags: trunk | |
| 11:32 | Show only users missing in roster when displaying add users dialog. check-in: 80f5c7520a user: sgolovan tags: trunk | |
| 10:50 | Fixed the attached users dialogs clash. check-in: 3b4cf2fc81 user: sgolovan tags: trunk | |
Changes
Changes to ChangeLog.
1 2 3 4 5 6 7 8 9 10 | 2016-01-25 Sergei Golovan <sgolovan@nes.ru> * plugins/roster/rosterx.tcl: Fixed the attached users dialogs clash. 2016-01-24 Sergei Golovan <sgolovan@nes.ru> * ifacetk/iface.tcl, tk/bwidget.tcl: Fixed sending the text status selected in the corresponding combobox. 2016-01-16 Sergei Golovan <sgolovan@nes.ru> | > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 | 2016-01-25 Sergei Golovan <sgolovan@nes.ru> * plugins/roster/rosterx.tcl: Fixed the attached users dialogs clash. * plugins/roster/rosterx.tcl: Show only users missing in roster when displaying add users dialog. 2016-01-24 Sergei Golovan <sgolovan@nes.ru> * ifacetk/iface.tcl, tk/bwidget.tcl: Fixed sending the text status selected in the corresponding combobox. 2016-01-16 Sergei Golovan <sgolovan@nes.ru> |
| ︙ | ︙ |
Changes to plugins/roster/rosterx.tcl.
| ︙ | ︙ | |||
44 45 46 47 48 49 50 |
set choices {}
set balloons {}
global recv_uc
variable dlg
::xmpp::xml::split $stanza tag xmlns attrs cdata subels
foreach c $subels {
| | > > > | 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 |
set choices {}
set balloons {}
global recv_uc
variable dlg
::xmpp::xml::split $stanza tag xmlns attrs cdata subels
foreach c $subels {
lassign [process_item $c] jid name groups desc
if {[::roster::find_jid $xlib $jid] eq ""} {
lappend choices [list $jid $name $groups] $desc
}
}
set d .dlg[incr dlg]
CbDialog $d [::msgcat::mc "Attached user:"] \
[list "Ok" \
[list [namespace current]::process_item_selection $d $xlib $from] \
[::msgcat::mc "Cancel"] [list destroy $d]] \
recv_uc $choices $balloons
|
| ︙ | ︙ | |||
97 98 99 100 101 102 103 |
set desc $jid
}
set groups [list]
foreach group $subels {
::xmpp::xml::split $group gtag gxmlns gattrs gcdata gsubels
lappend groups $gcdata
}
| | | 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 |
set desc $jid
}
set groups [list]
foreach group $subels {
::xmpp::xml::split $group gtag gxmlns gattrs gcdata gsubels
lappend groups $gcdata
}
return [list $jid $name $groups $desc]
}
###############################################################################
proc rosterx::process_x_rosterx {f x row xlib from} {
::xmpp::xml::split $x tag xmlns attrs cdata subels
|
| ︙ | ︙ |