diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-09-22 10:29:14 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-09-22 10:29:14 +0000 |
| commit | 8507f5529c1fa95cf068076001adc1dbdc91e4fc (patch) | |
| tree | 876ee2f2f0e11e80261468a6af017fa1e03970a2 /perl-install/install_gtk.pm | |
| parent | 2964bfdb899a583e8930740b6d59c1294d723843 (diff) | |
| download | drakx-backup-do-not-use-8507f5529c1fa95cf068076001adc1dbdc91e4fc.tar drakx-backup-do-not-use-8507f5529c1fa95cf068076001adc1dbdc91e4fc.tar.gz drakx-backup-do-not-use-8507f5529c1fa95cf068076001adc1dbdc91e4fc.tar.bz2 drakx-backup-do-not-use-8507f5529c1fa95cf068076001adc1dbdc91e4fc.tar.xz drakx-backup-do-not-use-8507f5529c1fa95cf068076001adc1dbdc91e4fc.zip | |
*** empty log message ***
Diffstat (limited to 'perl-install/install_gtk.pm')
| -rw-r--r-- | perl-install/install_gtk.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm index 92b1ef797..9b16f93f4 100644 --- a/perl-install/install_gtk.pm +++ b/perl-install/install_gtk.pm @@ -12,6 +12,7 @@ use devices; #-INTERN CONSTANT #-##################################################################################### my @themes_vga16 = qw(blue blackwhite savane); +my @themes_desktop = qw(mdk-Desktop DarkMarble marble3d blueHeart); my @themes = qw(mdk DarkMarble marble3d blueHeart); my (@background1, @background2); @@ -34,6 +35,7 @@ sub load_rc { sub default_theme { my ($o) = @_; + @themes = @themes_desktop if $o->{meta_class} eq 'desktop'; @themes = @themes_vga16 if $o->{simple_themes} || $o->{vga16}; install_theme($o, $o->{theme} || $themes[0]); } |