TclApps Library Source Code
Check-in [9c28b69758]
Not logged in
Core Home Timeline Branches Tags Tickets Wiki Login

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

Overview
Comment:Removed wrong utf-8 char from comments
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 9c28b697580760a697be98e97bad50ded472c5af43b99e64c34eec16b8faa06a
User & Date: emiliano 2025-01-21 15:49:15.035
Context
2025-03-13
16:32
Adjust tooltip package version requirement. Stop leaking interps when loading history. Leaf check-in: 783944b19c user: emiliano tags: trunk
2025-01-25
17:32
A few modifications to run ijbridge with Tcl 9. Added tls support for both jabber and IRC sides. Leaf check-in: 3cc18c6759 user: emiliano tags: ijbridge-tcl9
2025-01-21
15:49
Removed wrong utf-8 char from comments check-in: 9c28b69758 user: emiliano tags: trunk
2024-07-14
02:27
Update tcltls check-in: 8497c11b78 user: kevin_walzer tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to apps/tkchat/tkchat.vfs/lib/jabberlib/browse.tcl.
︙︙
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648

#
#       Called when receiving a 'set' or 'result' iq element in jabber:iq:browse
#       Shall only be called from jabberlib
#       Sets internal state, and makes callback to client proc. 
#       Could be called with type='remove' attribute.
#       For 'user' elements we need to build a table that maps the
#       'roomname@server/hexname' with the nick name.
#       It also keeps a list of all 'user'�s in a room.
#       
# Arguments:
#       browsename:   the instance of this conference browse.
#       fromJid:      the 'from' attribute which is also the parent of any
#                     childs.
#       subiq:      hierarchical xml list starting with element containing
#                     the xmlns='jabber:iq:browse' attribute.








|








634
635
636
637
638
639
640
641
642
643
644
645
646
647
648

#
#       Called when receiving a 'set' or 'result' iq element in jabber:iq:browse
#       Shall only be called from jabberlib
#       Sets internal state, and makes callback to client proc. 
#       Could be called with type='remove' attribute.
#       For 'user' elements we need to build a table that maps the
#       'roomname@server/hexname' with the nick name.
#       It also keeps a list of all 'user's in a room.
#       
# Arguments:
#       browsename:   the instance of this conference browse.
#       fromJid:      the 'from' attribute which is also the parent of any
#                     childs.
#       subiq:      hierarchical xml list starting with element containing
#                     the xmlns='jabber:iq:browse' attribute.
︙︙
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840

	    
		# If with 'user' tag in conferencing, keep internal table that
		# maps the 'room@server/hexname' to nickname.
		if {[info exists attrArr(name)]} {
		    set locals($jid,name) $attrArr(name)
		}
		
		# Keep list of all 'user'�s in a room. The 'parentJid' must
		# be the room's jid here.
		lappend locals($parentJid,allusers) $jid
		set locals($parentJid,allusers)  \
		  [lsort -unique $locals($parentJid,allusers)]
	    }	    
	}
    }








|








826
827
828
829
830
831
832
833
834
835
836
837
838
839
840

	    
		# If with 'user' tag in conferencing, keep internal table that
		# maps the 'room@server/hexname' to nickname.
		if {[info exists attrArr(name)]} {
		    set locals($jid,name) $attrArr(name)
		}
		
		# Keep list of all 'user's in a room. The 'parentJid' must
		# be the room's jid here.
		lappend locals($parentJid,allusers) $jid
		set locals($parentJid,allusers)  \
		  [lsort -unique $locals($parentJid,allusers)]
	    }	    
	}
    }
︙︙