Re: A question on using Tk::ItemStyle in Tk::Tree

I'm not sure what exactly is the problem, but the background colour seems to work if I change -selectbackground to plain -background.

Trying to configure -selectbackground without style leads to


Tk::Error: unknown option "-selectbackground" at /usr/lib/perl5/vendor
+_perl/5.14/x86_64-cygwin-threads/Tk.pm line 251.
[download]

which seems to indicate you can't change the option for a single entry.

Also, remove the declaration of $tree_element and declare it inside the sub:

sub abba_browse {
    my $tree_element = $tree->info('selection')->[0];
    # ...
[download]

لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Comment on Re: A question on using Tk::ItemStyle in Tk::Tree Select or Download Code

Replies are listed 'Best First'.

Thank you for trying and being able to reproduce the problem. After a couple of attempts, I've been able to narrow the problem to two issues.

setting -selectbackground at the ItemStyle level doesn't work. It can only be done at the Tree level (which mean as all entries in the tree need to have same selectbackground color). That said, there are no such issues at all with -selectforeground option.

when -selectbackground is set at the ItemStyle level AND has the same value (i.e. 'cyan' in the above code for both the ItemStyle objects), the -font option gets messsed up and thereby the last -font option encountered while executing the code gets used (i.e. see Question 2: above)

IT APPEARS TO ME TO BE A BUG IN Tk.

[reply]
[d/l]
[select]


Clear questions and runnable code get the best and fastest answer
	PerlMonks