From 2359181c57e4e9dd4213a7eb1ea55cac65687683 Mon Sep 17 00:00:00 2001 From: damien Date: Wed, 12 Sep 2001 15:12:48 +0000 Subject: new color for shadow --- perl-install/my_gtk.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm index a8a84161c..1c293a2ba 100644 --- a/perl-install/my_gtk.pm +++ b/perl-install/my_gtk.pm @@ -535,7 +535,8 @@ sub _create_window($$) { my $gc = Gtk::Gdk::GC->new(gtkroot()); !$::isStandalone && !$::live and $my_gtk::shape_width = 7; #- $gc->set_foreground(gtkcolor(8448, 17664, 40191)); #- in hex : 33, 69, 157 - $gc->set_foreground(gtkcolor(5120, 10752, 22784)); #- in hex : 20, 42, 89 +#- $gc->set_foreground(gtkcolor(5120, 10752, 22784)); #- in hex : 20, 42, 89 + $gc->set_foreground(gtkcolor(8448, 8448, 8448)); #- in hex : 20, 42, 89 my $inner = gtkadd(my $f_ = gtkset_shadow_type(new Gtk::Frame(undef), 'out'), my $f = gtkset_border_width(gtkset_shadow_type(new Gtk::Frame(undef), 'none'), 3) ); -- cgit v1.2.1