| Subject: | PATCH for bg color on Solaris |
On Solaris and linux, parts of the window have different background colors. The fix is simply to set the default value for the background option to undef instead of 'gray'. Not tested on Windows.
diff -c /PROJECTS/perlmod/Tk-Wizard-Bases-1.06/Wizard.pm.5.desktop /PROJECTS/perlmod/Tk-Wizard-Bases-1.06/Wizard.pm
*** /PROJECTS/perlmod/Tk-Wizard-Bases-1.06/Wizard.pm.5.desktop Wed Feb 2 08:38:33 2005
--- /PROJECTS/perlmod/Tk-Wizard-Bases-1.06/Wizard.pm Thu Feb 3 09:09:17 2005
***************
*** 237,243 ****
-command => ['CALLBACK', undef, undef, undef ],
# -foreground => ['PASSIVE', 'foreground','Foreground', 'black'],
-background => ['METHOD', 'background','Background',
! $^O=~/(MSWin32|cygwin)/i? 'SystemButtonFace':'gray'],
-style => ['PASSIVE',"style","Style","95"],
-imagepath => ['PASSIVE','topimagepath', 'Imagepath', undef],
-topimagepath => ['PASSIVE','topimagepath', 'Topimagepath', undef],
--- 237,244 ----
-command => ['CALLBACK', undef, undef, undef ],
# -foreground => ['PASSIVE', 'foreground','Foreground', 'black'],
-background => ['METHOD', 'background','Background',
! $^O=~/(MSWin32|cygwin)/i? 'SystemButtonFace':undef],
-style => ['PASSIVE',"style","Style","95"],
-imagepath => ['PASSIVE','topimagepath', 'Imagepath', undef],
-topimagepath => ['PASSIVE','topimagepath', 'Topimagepath', undef],