From 707a033ff2a56113ab8e7dd2f4a9f7ca6df1d45c Mon Sep 17 00:00:00 2001 From: Florent Villard Date: Tue, 21 Sep 2004 09:21:44 +0000 Subject: use corporate gtk theme in corporate --- 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 dd5faef65..33dc3c39e 100644 --- a/perl-install/install_gtk.pm +++ b/perl-install/install_gtk.pm @@ -110,7 +110,7 @@ sub default_theme { my ($o) = @_; $::move ? '/usr/share/themes/Galaxy/gtk-2.0/gtkrc' : $o->{meta_class} eq 'firewall' ? 'mdk-Firewall' : - $o->{simple_themes} || $o->{vga16} ? 'blue' : 'galaxy'; + $o->{simple_themes} || $o->{vga16} ? 'blue' : $::corporate ? 'corporate' : 'galaxy'; } sub install_theme { -- cgit v1.2.1