From aecd1fd020ea85226f62772701e3e612ca49b6fb Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Fri, 14 Feb 2003 13:13:47 +0000
Subject: fix default_theme always responding 'galaxy'

---
 perl-install/install_gtk.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index c211b6ea4..b3857dea7 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -74,7 +74,7 @@ sub default_theme {
 sub install_theme {
     my ($o) = @_;
 
-    $o->{theme} ||= default_theme();
+    $o->{theme} ||= default_theme($o);
     load_rc($o, "themes-$o->{theme}");
 
     Gtk2::Rc->parse_string(q(
-- 
cgit v1.2.1