diff options
| -rw-r--r-- | audio/vat/files/patch-ag | 45 | ||||
| -rw-r--r-- | mbone/vat/files/patch-ag | 45 |
2 files changed, 90 insertions, 0 deletions
diff --git a/audio/vat/files/patch-ag b/audio/vat/files/patch-ag new file mode 100644 index 0000000..c4735e3 --- /dev/null +++ b/audio/vat/files/patch-ag @@ -0,0 +1,45 @@ +--- ui-resource.tcl.orig Tue Mar 12 07:32:56 1996 ++++ ui-resource.tcl Thu Feb 19 10:48:04 1998 +@@ -111,32 +111,24 @@ + # + option add *tearOff 0 + +- # +- # Make the color scheme a little darker than the default gray. +- # Go through all the palette resources and raise the option data +- # base priority from widgetDefault to 61 so that user's X resources +- # won't override these. +- # +- tk_setPalette gray80 +- foreach option [array names tkPalette] { +- option add *$option $tkPalette($option) 61 +- } +- + option add *highlightThickness 0 + + option add *Radiobutton.relief flat startupFile + option add *Checkbutton.anchor w startupFile + option add *Radiobutton.anchor w startupFile + option add *Radiobutton.relief flat startupFile +- option add *Scale.sliderForeground gray66 startupFile +- option add *Scale.activeForeground gray80 startupFile +- option add *Scale.background gray70 startupFile + +- # vat widgets +- option add Vat.disabledColor gray50 startupFile +- option add Vat.highlightColor gray95 startupFile ++ # add color defaults for vat widgets - where possible, use ++ # the platform specific values compiled into tk widgets ++ scale .junk ++ option add *foreground [.junk cget -foreground] widgetDefault ++ option add *background [.junk cget -background] widgetDefault ++ option add *activeBackground [.junk cget -activebackground] widgetDefault ++ destroy .junk ++ ++ option add *highlightColor white widgetDefault + option add Vat.infoHighlightColor LightYellow2 startupFile +- option add *VatVU.foreground black startupFile ++ option add Vat.disabledColor gray50 startupFile + option add *VatVU.peak gray50 startupFile + option add *VatVU.hot firebrick1 startupFile + option add *VatVU.hotLevel 90 startupFile diff --git a/mbone/vat/files/patch-ag b/mbone/vat/files/patch-ag new file mode 100644 index 0000000..c4735e3 --- /dev/null +++ b/mbone/vat/files/patch-ag @@ -0,0 +1,45 @@ +--- ui-resource.tcl.orig Tue Mar 12 07:32:56 1996 ++++ ui-resource.tcl Thu Feb 19 10:48:04 1998 +@@ -111,32 +111,24 @@ + # + option add *tearOff 0 + +- # +- # Make the color scheme a little darker than the default gray. +- # Go through all the palette resources and raise the option data +- # base priority from widgetDefault to 61 so that user's X resources +- # won't override these. +- # +- tk_setPalette gray80 +- foreach option [array names tkPalette] { +- option add *$option $tkPalette($option) 61 +- } +- + option add *highlightThickness 0 + + option add *Radiobutton.relief flat startupFile + option add *Checkbutton.anchor w startupFile + option add *Radiobutton.anchor w startupFile + option add *Radiobutton.relief flat startupFile +- option add *Scale.sliderForeground gray66 startupFile +- option add *Scale.activeForeground gray80 startupFile +- option add *Scale.background gray70 startupFile + +- # vat widgets +- option add Vat.disabledColor gray50 startupFile +- option add Vat.highlightColor gray95 startupFile ++ # add color defaults for vat widgets - where possible, use ++ # the platform specific values compiled into tk widgets ++ scale .junk ++ option add *foreground [.junk cget -foreground] widgetDefault ++ option add *background [.junk cget -background] widgetDefault ++ option add *activeBackground [.junk cget -activebackground] widgetDefault ++ destroy .junk ++ ++ option add *highlightColor white widgetDefault + option add Vat.infoHighlightColor LightYellow2 startupFile +- option add *VatVU.foreground black startupFile ++ option add Vat.disabledColor gray50 startupFile + option add *VatVU.peak gray50 startupFile + option add *VatVU.hot firebrick1 startupFile + option add *VatVU.hotLevel 90 startupFile |
