in reply to Problem with Scrolled tab from Tk::Notebook widget using Podtext

I was able to get the fg color, but I was unable to change or alter the bg color.
#!/usr/bin/perl BEGIN { $ENV{'TKPODDEBUG'} = 1; } use strict; use warnings; use Tk; use Tk::Pod::Text; my $Man_frame = 8; my $file = '/usr/lib/perl5/5.8.8/CGI.pm'; my $mw = MainWindow->new; my $ptw = $mw->Scrolled ("PodText", -fg => 'black', -file => $file, -scrollbars => "se", -wrap => 'word', )->form( -top => [$Man_frame], -left => ['%1',0], -right => ['%99',0], -bottom => ['%98',0], ); MainLoop;
  • Comment on Re: Problem with Scrolled tab from Tk::Notebook widget using Podtext
  • Download Code