From 42daa5be670a2ec249edfee7671155d2ea634e38 Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Thu, 13 Sep 2001 15:24:48 +0000
Subject: shadow reduced to 5 pixels

---
 perl-install/my_gtk.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install/my_gtk.pm')

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
-- 
cgit v1.2.1