Tkabber contrib

Check-in [b9d67b41b9]
Login

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

Overview
Comment:Fixed bug with user disconnecting (den_po).
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: b9d67b41b9ada2161b1853569ffa6bb5c5b68b57
User & Date: rejjin 2013-03-12 12:13:45.000
Context
2013-05-31
15:57
Allow "s #dddddd+" command with small letter 's'. check-in: 42962ad511 user: toktonada tags: trunk
2013-03-12
12:13
Fixed bug with user disconnecting (den_po). check-in: b9d67b41b9 user: rejjin tags: trunk
2013-02-25
14:02
Get language list when http-connection fail (in loop with sleeping 60 sec) check-in: 4c40664928 user: rejjin tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to tabimages/tabimages.tcl.
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
		bottom [::msgcat::mc "Bottom"] \
	]
	
	hook::add finload_hook [list ${space}::tab_images_init -reload 0] 100	
	hook::add finload_hook ${space}::switch_font 100
	hook::add open_chat_post_hook ${space}::update_tab 90
	hook::add client_presence_hook ${space}::change_presence 60
	
	
	proc update_tab { chatid type } {
		variable state
	
		if !$::usetabbar return
	
		switch -- $state {







|







48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
		bottom [::msgcat::mc "Bottom"] \
	]
	
	hook::add finload_hook [list ${space}::tab_images_init -reload 0] 100	
	hook::add finload_hook ${space}::switch_font 100
	hook::add open_chat_post_hook ${space}::update_tab 90
	hook::add client_presence_hook ${space}::change_presence 60
	hook::add disconnected_hook [list ${space}::tab_images_init -reload 1] 100
	
	proc update_tab { chatid type } {
		variable state
	
		if !$::usetabbar return
	
		switch -- $state {