Skip Menu |
 

This queue is for tickets about the Tk CPAN distribution.

Report information
The Basics
Id: 7126
Status: new
Priority: 0/
Queue: Tk

People
Owner: Nobody in particular
Requestors: rrwo [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 804.027
Fixed in: (no value)



Subject: Tk::BrowseEntry -colorstate has no effect...
Download (untitled) / with headers
text/plain 740b
The -colorstate option is being ignored. Doing some rudimentary debugging, it seems that _set_edit_state() works ok, but for some reason it's not being set in the constructor. Maybe something is wrong in the Populate method with the call to ConfigSpecs? Dumping $w->{Configure} shows that there is no {-colorstate} key. I've tried changing colorstate to use a method: sub colorstate { my $w = shift; unless( @_ ) { return( $w->{Configure}{-colorstate} ); } else { my $state = shift; $w->{Configure}{-colorstate} = $state || $w->state; $w->_set_edit_state( $w->state ); } } The value is set, and the code is called, but something that sets the LabEntry still sets the color to disabled.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.