[Tkabber-dev] r1085 - in trunk/tkabber: . ifacetk

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Sun Apr 8 18:12:50 MSD 2007


Author: sergei
Date: 2007-04-08 18:12:50 +0400 (Sun, 08 Apr 2007)
New Revision: 1085

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/ifacetk/iroster.tcl
Log:
	* ifacetk/iroster.tcl: Changed default roster icon from empty to
	  ordinary user icon.


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2007-04-08 11:06:32 UTC (rev 1084)
+++ trunk/tkabber/ChangeLog	2007-04-08 14:12:50 UTC (rev 1085)
@@ -14,6 +14,9 @@
 	* msgs/de.msg: Updated German translation (thanks to Roger
 	  Sondermann).
 
+	* ifacetk/iroster.tcl: Changed default roster icon from empty to
+	  ordinary user icon.
+
 2007-04-02  Sergei Golovan  <sgolovan at nes.ru>
 
 	* msgs/de.msg: Updated German translation (thanks to Roger

Modified: trunk/tkabber/ifacetk/iroster.tcl
===================================================================
--- trunk/tkabber/ifacetk/iroster.tcl	2007-04-08 11:06:32 UTC (rev 1084)
+++ trunk/tkabber/ifacetk/iroster.tcl	2007-04-08 14:12:50 UTC (rev 1085)
@@ -695,7 +695,10 @@
 	    return [get_service_icon $connid $jid $type $status]
 	}
 	default {
-	    return ""
+	    if {$status == ""} {
+		set status [get_jid_status $connid $jid]
+	    }
+	    return [get_user_icon $connid $jid $status]
 	}
     }
 }



More information about the Tkabber-dev mailing list