diff options
author | damien <damien@mandriva.com> | 2001-09-13 15:24:48 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2001-09-13 15:24:48 +0000 |
commit | 42daa5be670a2ec249edfee7671155d2ea634e38 (patch) | |
tree | aea9066fa29e1c570fdc702acaa38b6f7d2f187b /perl-install/my_gtk.pm | |
parent | 1d35cabe811d12684881e4fc9fa38ac3f1685211 (diff) | |
download | drakx-backup-do-not-use-42daa5be670a2ec249edfee7671155d2ea634e38.tar drakx-backup-do-not-use-42daa5be670a2ec249edfee7671155d2ea634e38.tar.gz drakx-backup-do-not-use-42daa5be670a2ec249edfee7671155d2ea634e38.tar.bz2 drakx-backup-do-not-use-42daa5be670a2ec249edfee7671155d2ea634e38.tar.xz drakx-backup-do-not-use-42daa5be670a2ec249edfee7671155d2ea634e38.zip |
shadow reduced to 5 pixels
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r-- | perl-install/my_gtk.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm index 102a3d5de..9b3b0ea1a 100644 --- a/perl-install/my_gtk.pm +++ b/perl-install/my_gtk.pm @@ -221,6 +221,7 @@ sub gtksetstyle { sub gtkset_tip { my ($tips, $w, $tip) = @_; $tips->set_tip($w, $tip) if $tip; + $w; } sub gtkappenditems { @@ -533,7 +534,7 @@ sub _create_window($$) { my ($o, $title) = @_; my $w = new Gtk::Window; my $gc = Gtk::Gdk::GC->new(gtkroot()); - !$::isStandalone && !$::live && !$::g_auto_install and $my_gtk::shape_width = 7; + !$::isStandalone && !$::live && !$::g_auto_install and $my_gtk::shape_width = 5; #- $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(8448, 8448, 8448)); #- in hex : 20, 42, 89 |