Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

tablelist and aqua theme

34 views
Skip to first unread message

Nicolas

unread,
Mar 29, 2019, 1:31:23 AM3/29/19
to
Hi Csaba,
I'm trying to port my app to aquaTheme using this TK branch:
https://core.tcl.tk/tk/timeline?r=bug-0d63621b6c

toplevels containing tablelist does not work because of unknown option "-padding"

in tablelistUtil.tcl I had to put some check like if {[winfo class $w] eq {TLabel}} everytime [$w cget -padding] is requested in order to make it work.

++
nicolas

nemethi

unread,
Mar 29, 2019, 9:00:22 AM3/29/19
to
Am 29.03.19 um 06:31 schrieb Nicolas:
I am aware of this bug, introduced in Tablelist 6.4. To work around it,
it is sufficient to change *just one* line in tablelistUtil.tcl:
Replace line #2970

if {[string compare [getCurrentTheme] "aqua"] == 0} {

with

variable usingTile
if {$usingTile && [string compare [mwutil::currentTheme] "aqua"] ==
0} {

--
Csaba Nemethi http://www.nemethi.de mailto:csaba....@t-online.de

Nicolas

unread,
Mar 29, 2019, 10:55:14 AM3/29/19
to
Hi Csaba,
this fix works as expected.
many thanks,

++
nicolas
0 new messages