[Tkabber-dev] r527 - trunk/plugins/tabbedcon

tkabber-svn at jabber.ru tkabber-svn at jabber.ru
Fri Dec 21 17:08:36 MSK 2012


Author: ancestor
Date: 2012-12-21 17:08:36 +0400 (Fri, 21 Dec 2012)
New Revision: 527

Modified:
   trunk/plugins/tabbedcon/tabbedcon.tcl
Log:
1) Fixed bug in tabbedcon plugin in using of geometry manager for tcl/tk8.6

Modified: trunk/plugins/tabbedcon/tabbedcon.tcl
===================================================================
--- trunk/plugins/tabbedcon/tabbedcon.tcl	2012-09-07 22:35:05 UTC (rev 526)
+++ trunk/plugins/tabbedcon/tabbedcon.tcl	2012-12-21 13:08:36 UTC (rev 527)
@@ -184,8 +184,10 @@
 
     create_pseudo_menu $mf
 
-    set nt [::tkcon::InitTab $w]
+    set tbf [frame $w.tbf]
+    set nt [::tkcon::InitTab $tbf]
 
+    pack $tbf -fill both -expand yes
     pack $nt -fill both -expand yes
 
     ::tkcon::GotoTab $nt
@@ -193,6 +195,7 @@
     set sy [scrollbar $nt.sy -takefocus 0 -command [list $nt yview]]
 
     $nt configure -yscrollcommand [list $sy set]
+    $nt configure -font Terminus
 
     pack $sy -side right -fill both
 
@@ -209,4 +212,4 @@
     restore_menu .tkcon.mbar.console
     
     tkcon show
-}
\ No newline at end of file
+}



More information about the Tkabber-dev mailing list