[Tkabber-dev] r129 - trunk/plugins/hidemuctopic

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Thu Aug 28 16:10:07 MSD 2008


Author: kostix
Date: 2008-08-28 16:10:07 +0400 (Thu, 28 Aug 2008)
New Revision: 129

Modified:
   trunk/plugins/hidemuctopic/hidemuctopic.tcl
Log:
hidemuctopic/hidemuctopic.tcl: Renamed namespace "muchidetopic"
 to "hidemuctopic". This completes the renaming of "muchidetopic"
 plugin to "hidemuctopic".


Modified: trunk/plugins/hidemuctopic/hidemuctopic.tcl
===================================================================
--- trunk/plugins/hidemuctopic/hidemuctopic.tcl	2008-08-28 12:09:00 UTC (rev 128)
+++ trunk/plugins/hidemuctopic/hidemuctopic.tcl	2008-08-28 12:10:07 UTC (rev 129)
@@ -7,7 +7,7 @@
 
 event add <<ToggleTopicWindow>> <Control-Key-t>
 
-namespace eval muchidetopic {
+namespace eval hidemuctopic {
 	variable options
 	variable packinfo
 
@@ -26,11 +26,11 @@
 		[namespace current]::setup
 }
 
-proc muchidetopic::topicwin {chatid} {
+proc hidemuctopic::topicwin {chatid} {
 	return [chat::winid $chatid].status
 }
 
-proc muchidetopic::setup {chatid type} {
+proc hidemuctopic::setup {chatid type} {
 	if {![string equal $type groupchat]} return
 
 	variable options
@@ -56,16 +56,16 @@
 	}
 }
 
-proc muchidetopic::hide {chatid} {
+proc hidemuctopic::hide {chatid} {
 	pack forget [topicwin $chatid]
 }
 
-proc muchidetopic::show {chatid} {
+proc hidemuctopic::show {chatid} {
 	variable packinfo
 	eval [list pack [topicwin $chatid]] $packinfo($chatid)
 }
 
-proc muchidetopic::toggle {chatid} {
+proc hidemuctopic::toggle {chatid} {
 	set w [topicwin $chatid]
 	if {[winfo ismapped $w]} {
 		hide $chatid



More information about the Tkabber-dev mailing list