[Tkabber-dev] r797 - in trunk/tkabber: . plugins/iq

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Wed Nov 22 21:50:33 MSK 2006


Author: sergei
Date: 2006-11-22 21:50:24 +0300 (Wed, 22 Nov 2006)
New Revision: 797

Modified:
   trunk/tkabber/ChangeLog
   trunk/tkabber/plugins/iq/version.tcl
Log:
	* plugins/iq/version.tcl: Fixed bug with reporting empty
	  string for Linux distribution (thanks to Pavel Borzenkov).


Modified: trunk/tkabber/ChangeLog
===================================================================
--- trunk/tkabber/ChangeLog	2006-11-20 20:06:39 UTC (rev 796)
+++ trunk/tkabber/ChangeLog	2006-11-22 18:50:24 UTC (rev 797)
@@ -1,3 +1,8 @@
+2006-11-22  Sergei Golovan  <sgolovan at nes.ru>
+
+	* plugins/iq/version.tcl: Fixed bug with reporting empty
+	  string for Linux distribution (thanks to Pavel Borzenkov).
+
 2006-11-20  Sergei Golovan  <sgolovan at nes.ru>
 
 	* plugins/chat/info_commands.tcl: Fixed bug with asking

Modified: trunk/tkabber/plugins/iq/version.tcl
===================================================================
--- trunk/tkabber/plugins/iq/version.tcl	2006-11-20 20:06:39 UTC (rev 796)
+++ trunk/tkabber/plugins/iq/version.tcl	2006-11-22 18:50:24 UTC (rev 797)
@@ -57,7 +57,7 @@
 proc guess_linux_distribution {} {
     global linux_distribution
 
-    if {[info exists linux_distribution]} {
+    if {[info exists linux_distribution] && $linux_distribution != {}} {
 	return $linux_distribution
     }
 
@@ -80,7 +80,7 @@
 
 	try_linux_version $distr $file $flag
 
-	if {[info exists linux_distribution]} {
+	if {[info exists linux_distribution] && $linux_distribution != {}} {
 	    return $linux_distribution
 	}
     }



More information about the Tkabber-dev mailing list