[Tkabber-dev] r1550 - in trunk/tkabber-plugins: . checkers chess ejabberd georoster jidlink jidlink/plugins renju reversi spy whiteboard

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Sat Oct 18 14:14:32 MSD 2008


Author: sergei
Date: 2008-10-18 14:14:32 +0400 (Sat, 18 Oct 2008)
New Revision: 1550

Modified:
   trunk/tkabber-plugins/ChangeLog
   trunk/tkabber-plugins/checkers/checkers.tcl
   trunk/tkabber-plugins/chess/chess.tcl
   trunk/tkabber-plugins/ejabberd/ejabberd.tcl
   trunk/tkabber-plugins/georoster/georoster.tcl
   trunk/tkabber-plugins/jidlink/jidlink.tcl
   trunk/tkabber-plugins/jidlink/plugins/filetransfer.tcl
   trunk/tkabber-plugins/renju/renju.tcl
   trunk/tkabber-plugins/reversi/reversi.tcl
   trunk/tkabber-plugins/spy/spy.tcl
   trunk/tkabber-plugins/whiteboard/whiteboard.tcl
Log:
	* checkers/checkers.tcl, chess/chess.tcl, ejabberd/ejabberd.tcl,
	  georoster/georoster.tcl, jidlink/jidlink.tcl,
	  jidlink/plugins/filetransfer.tcl, renju/renju.tcl,
	  reversi/reversi.tcl, spy/spy.tcl, whiteboard/whiteboard.tcl: Removed
	  unnecessary call to format command.


Modified: trunk/tkabber-plugins/ChangeLog
===================================================================
--- trunk/tkabber-plugins/ChangeLog	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/ChangeLog	2008-10-18 10:14:32 UTC (rev 1550)
@@ -4,6 +4,12 @@
 
 	* jidlink/jidlink.tcl: Fixed query namespace.
 
+	* checkers/checkers.tcl, chess/chess.tcl, ejabberd/ejabberd.tcl,
+	  georoster/georoster.tcl, jidlink/jidlink.tcl,
+	  jidlink/plugins/filetransfer.tcl, renju/renju.tcl,
+	  reversi/reversi.tcl, spy/spy.tcl, whiteboard/whiteboard.tcl: Removed
+	  unnecessary call to format command.
+
 2008-10-17  Sergei Golovan <sgolovan at nes.ru>
 
 	* *: 0.11.1 is released.

Modified: trunk/tkabber-plugins/checkers/checkers.tcl
===================================================================
--- trunk/tkabber-plugins/checkers/checkers.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/checkers/checkers.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -97,7 +97,7 @@
 
     set wf [$w getframe]
     message $wf.message -aspect 50000 \
-	-text [format [::msgcat::mc "Sending checkers game invitation to %s (%s)"] \
+	-text [::msgcat::mc "Sending checkers game invitation to %s (%s)" \
 		      [get_nick $xlib $jid chat] \
 		      $jid]
 
@@ -174,7 +174,7 @@
 	destroy $w
     }
 
-    Dialog $w -title [format [::msgcat::mc "Checkers Invitation from %s"] $jid] \
+    Dialog $w -title [::msgcat::mc "Checkers Invitation from %s" $jid] \
 	-modal none -separator 1 -anchor e -default 0
 
     set wf [$w getframe]
@@ -182,15 +182,15 @@
     bind $wf <Destroy> [list [namespace current]::set_invited_res ""]
 
     set nick [get_nick $xlib $jid chat]
-    set message1 [format [::msgcat::mc "Checkers game invitation from %s (%s) is received."] \
+    set message1 [::msgcat::mc "Checkers game invitation from %s (%s) is received." \
 			 $nick $jid]
-    set message2 [format [::msgcat::mc "%s wants play %s."] $nick $game_names($game)]
+    set message2 [::msgcat::mc "%s wants play %s." $nick $game_names($game)]
     switch -- $color {
 	white {
-	    set message3 [format [::msgcat::mc "%s wants play white."] $nick]
+	    set message3 [::msgcat::mc "%s wants play white." $nick]
 	}
 	black {
-	    set message3 [format [::msgcat::mc "%s wants play black."] $nick]
+	    set message3 [::msgcat::mc "%s wants play black." $nick]
 	}
 	default {
 	    return [list error modify bad-request]
@@ -565,7 +565,7 @@
 	return
     }
 
-    set title [format [::msgcat::mc "%s with %s"] \
+    set title [::msgcat::mc "%s with %s" \
 	$short_game_names($flags(game)) [get_nick $flags(xlib) $jid chat]]
     add_win $w -title $title \
 	       -tabtitle $title \

Modified: trunk/tkabber-plugins/chess/chess.tcl
===================================================================
--- trunk/tkabber-plugins/chess/chess.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/chess/chess.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -95,7 +95,7 @@
 
     set wf [$w getframe]
     message $wf.message -aspect 50000 \
-	-text [format [::msgcat::mc "Sending chess game invitation to %s (%s)"] \
+	-text [::msgcat::mc "Sending chess game invitation to %s (%s)" \
 		      [get_nick $xlib $jid chat] \
 		      $jid]
 
@@ -151,7 +151,7 @@
 	destroy $w
     }
 
-    Dialog $w -title [format [::msgcat::mc "Chess Invitation from %s"] $jid] \
+    Dialog $w -title [::msgcat::mc "Chess Invitation from %s" $jid] \
 	-modal none -separator 1 -anchor e -default 0
 
     set wf [$w getframe]
@@ -159,14 +159,14 @@
     bind $wf <Destroy> [list [namespace current]::set_invited_res ""]
 
     set nick [get_nick $xlib $jid chat]
-    set message1 [format [::msgcat::mc "Chess game invitation from %s (%s) is received."] \
+    set message1 [::msgcat::mc "Chess game invitation from %s (%s) is received." \
 			 $nick $jid]
     switch -- $color {
 	white {
-	    set message2 [format [::msgcat::mc "%s wants play white."] $nick]
+	    set message2 [::msgcat::mc "%s wants play white." $nick]
 	}
 	black {
-	    set message2 [format [::msgcat::mc "%s wants play black."] $nick]
+	    set message2 [::msgcat::mc "%s wants play black." $nick]
 	}
 	default {
 	    return [list error modify bad-request]
@@ -575,7 +575,7 @@
 	return
     }
 
-    set title [format [::msgcat::mc "Chess with %s"] [get_nick $flags(xlib) $jid chat]]
+    set title [::msgcat::mc "Chess with %s" [get_nick $flags(xlib) $jid chat]]
     add_win $w -title $title \
 	       -tabtitle $title \
 	       -class Chess \

Modified: trunk/tkabber-plugins/ejabberd/ejabberd.tcl
===================================================================
--- trunk/tkabber-plugins/ejabberd/ejabberd.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/ejabberd/ejabberd.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -109,7 +109,7 @@
 	return
     }
 
-    set title [format [::msgcat::mc "%s administration"] $jid]
+    set title [::msgcat::mc "%s administration" $jid]
     add_win $w -title $title \
 	       -tabtitle $jid \
 	       -class Ejabberd \

Modified: trunk/tkabber-plugins/georoster/georoster.tcl
===================================================================
--- trunk/tkabber-plugins/georoster/georoster.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/georoster/georoster.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -230,7 +230,7 @@
     set georoster(cur_lo) $lo
     set georoster(cur_la) $la
 
-    set status [format [::msgcat::mc "Latitude: %.2f  Longitude: %.2f"] $la $lo]
+    set status [::msgcat::mc "Latitude: %.2f  Longitude: %.2f" $la $lo]
 }
 
 ###############################################################################
@@ -730,7 +730,7 @@
 	set newlo [lo $newx $newy]
 	set newla [la $newx $newy]
 
-	set status [format [::msgcat::mc "Latitude: %.2f  Longitude: %.2f"] $newla $newlo]
+	set status [::msgcat::mc "Latitude: %.2f  Longitude: %.2f" $newla $newlo]
 
 	$c move icon&&$ctag&&$tag [expr {$x - $move(lastx)}] [expr {$y - $move(lasty)}]
 

Modified: trunk/tkabber-plugins/jidlink/jidlink.tcl
===================================================================
--- trunk/tkabber-plugins/jidlink/jidlink.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/jidlink/jidlink.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -205,7 +205,7 @@
 	lassign $t name prio
 
 	custom::defvar transport(allowed,$name) 1 \
-	[format [::msgcat::mc "Enable Jidlink transport %s."] $name] \
+	[::msgcat::mc "Enable Jidlink transport %s." $name] \
 	-type boolean -group Jidlink
     }
 }

Modified: trunk/tkabber-plugins/jidlink/plugins/filetransfer.tcl
===================================================================
--- trunk/tkabber-plugins/jidlink/plugins/filetransfer.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/jidlink/plugins/filetransfer.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -157,7 +157,7 @@
 	set w .rfd$winid
     }
 
-    Dialog $w -title [format [::msgcat::mc "Receive file from %s"] $from] \
+    Dialog $w -title [::msgcat::mc "Receive file from %s" $from] \
 	-separator 1 -anchor e \
 	-modal none -default 0 -cancel 1
 
@@ -351,7 +351,7 @@
 	    }
 	    after idle \
 		[list MessageDlg .auth_err -aspect 50000 -icon error \
-		      -message [format [::msgcat::mc "Receiving file failed: %s"] \
+		      -message [::msgcat::mc "Receiving file failed: %s" \
 				    $msg] \
 		      -type user \
 		      -buttons ok -default 0 -cancel 0]

Modified: trunk/tkabber-plugins/renju/renju.tcl
===================================================================
--- trunk/tkabber-plugins/renju/renju.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/renju/renju.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -90,7 +90,7 @@
 
     set wf [$w getframe]
     message $wf.message -aspect 50000 \
-	-text [format [::msgcat::mc "Sending Gomoku/Renju game invitation to %s (%s)"] \
+	-text [::msgcat::mc "Sending Gomoku/Renju game invitation to %s (%s)" \
 		      [get_nick $xlib $jid chat] \
 		      $jid]
 
@@ -171,15 +171,15 @@
     bind $wf <Destroy> [list [namespace current]::set_invited_res ""]
 
     set nick [get_nick $xlib $jid chat]
-    set message1 [format [::msgcat::mc "Gomoku/Renju game invitation from %s (%s) is received."] \
+    set message1 [::msgcat::mc "Gomoku/Renju game invitation from %s (%s) is received." \
 			 $nick $jid]
-    set message2 [format [::msgcat::mc "%s wants play %s."] $nick $game_names($game)]
+    set message2 [::msgcat::mc "%s wants play %s." $nick $game_names($game)]
     switch -- $color {
 	white {
-	    set message3 [format [::msgcat::mc "%s wants to move second."] $nick]
+	    set message3 [::msgcat::mc "%s wants to move second." $nick]
 	}
 	black {
-	    set message3 [format [::msgcat::mc "%s wants to move first."] $nick]
+	    set message3 [::msgcat::mc "%s wants to move first." $nick]
 	}
 	default {
 	    return [list error modify bad-request]

Modified: trunk/tkabber-plugins/reversi/reversi.tcl
===================================================================
--- trunk/tkabber-plugins/reversi/reversi.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/reversi/reversi.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -77,7 +77,7 @@
 
     set wf [$w getframe]
     message $wf.message -aspect 50000 \
-	-text [format [::msgcat::mc "Sending reversi game invitation to %s (%s)"] \
+	-text [::msgcat::mc "Sending reversi game invitation to %s (%s)" \
 		      [get_nick $xlib $jid chat] \
 		      $jid]
 
@@ -133,7 +133,7 @@
 	destroy $w
     }
 
-    Dialog $w -title [format [::msgcat::mc "Reversi Invitation from %s"] $jid] \
+    Dialog $w -title [::msgcat::mc "Reversi Invitation from %s" $jid] \
 	-modal none -separator 1 -anchor e -default 0
 
     set wf [$w getframe]
@@ -141,14 +141,14 @@
     bind $wf <Destroy> [list [namespace current]::set_invited_res ""]
 
     set nick [get_nick $xlib $jid chat]
-    set message1 [format [::msgcat::mc "Reversi game invitation from %s (%s) is received."] \
+    set message1 [::msgcat::mc "Reversi game invitation from %s (%s) is received." \
 			 $nick $jid]
     switch -- $color {
 	white {
-	    set message2 [format [::msgcat::mc "%s wants play white."] $nick]
+	    set message2 [::msgcat::mc "%s wants play white." $nick]
 	}
 	black {
-	    set message2 [format [::msgcat::mc "%s wants play black."] $nick]
+	    set message2 [::msgcat::mc "%s wants play black." $nick]
 	}
 	default {
 	    return [list error modify bad-request]
@@ -435,7 +435,7 @@
 	return
     }
 
-    set title [format [::msgcat::mc "Reversi with %s"] [get_nick $flags(xlib) $jid chat]]
+    set title [::msgcat::mc "Reversi with %s" [get_nick $flags(xlib) $jid chat]]
     add_win $w -title $title \
 	       -tabtitle $title \
 	       -class Reversi \

Modified: trunk/tkabber-plugins/spy/spy.tcl
===================================================================
--- trunk/tkabber-plugins/spy/spy.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/spy/spy.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -199,7 +199,7 @@
         destroy $w
     }
 
-    set message [format [::msgcat::mc "Spy Alert: user %s (%s) is available!"] $nick $jid]
+    set message [::msgcat::mc "Spy Alert: user %s (%s) is available!" $nick $jid]
     Dialog $w -title $message -modal none -separator 1 -anchor e -default 0 -cancel 1
 
     set frame [$w getframe]

Modified: trunk/tkabber-plugins/whiteboard/whiteboard.tcl
===================================================================
--- trunk/tkabber-plugins/whiteboard/whiteboard.tcl	2008-10-18 10:13:07 UTC (rev 1549)
+++ trunk/tkabber-plugins/whiteboard/whiteboard.tcl	2008-10-18 10:14:32 UTC (rev 1550)
@@ -44,7 +44,7 @@
 
     set jid [chat::get_jid $chatid]
 
-    set title [format [::msgcat::mc "%s whiteboard"] $jid]
+    set title [::msgcat::mc "%s whiteboard" $jid]
     add_win $w -title $title \
 	       -tabtitle $title \
 	       -class Whiteboard \



More information about the Tkabber-dev mailing list