summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-08-07 15:09:11 +0000
committerFrancois Pons <fpons@mandriva.com>2002-08-07 15:09:11 +0000
commited82396b927acd538c85151e80c3ebc744d50601 (patch)
tree1efed0a8a8f3fcf315cc114d0cd3fc79a54c618b /perl-install
parenta42d49f704cc6b06602afacdd6be0ae1589f9ba9 (diff)
downloaddrakx-backup-do-not-use-ed82396b927acd538c85151e80c3ebc744d50601.tar
drakx-backup-do-not-use-ed82396b927acd538c85151e80c3ebc744d50601.tar.gz
drakx-backup-do-not-use-ed82396b927acd538c85151e80c3ebc744d50601.tar.bz2
drakx-backup-do-not-use-ed82396b927acd538c85151e80c3ebc744d50601.tar.xz
drakx-backup-do-not-use-ed82396b927acd538c85151e80c3ebc744d50601.zip
added automatic update of lilo image and KDE & GNOME background.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps.pm30
1 files changed, 30 insertions, 0 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 47249b586..916fd53b9 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -306,6 +306,11 @@ sub beforeInstallPackages {
log::l("setting excludedocs to $o->{excludedocs}");
substInFile { s/%_excludedocs.*//; $_ .= "%_excludedocs yes\n" if eof && $o->{excludedocs} } "$o->{prefix}/etc/rpm/macros";
+
+ #- add oem lilo theme and background if the files exists.
+ mkdir "$o->{prefix}$_" foreach qw(/boot /usr /usr/share /usr/share/mdk);
+ install_any::getAndSaveFile("Mandrake/base/oem-message-graphic", "$o->{prefix}/boot/oem-message-graphic");
+ install_any::getAndSaveFile("Mandrake/base/oem-background.png", "$o->{prefix}/usr/share/mdk/oem-background.png");
}
sub pkg_install {
@@ -515,6 +520,31 @@ GridHeight=70
}
}
+ #- update oem lilo image if it exists.
+ if (-s "/boot/oem-message-graphic") {
+ rename "$o->{prefix}/boot/message-graphic", "$o->{prefix}/boot/message-graphic.mdkgiorig";
+ rename "$o->{prefix}/boot/oem-message-graphic", "$o->{prefix}/boot/message-graphic";
+ }
+
+ #- update background image if it exists for common environment.
+ if (-s -s "/usr/share/mdk/oem-background.png") {
+ #- KDE desktop background.
+ if (-e "$o->{prefix}/usr/share/config/kdesktoprc") {
+ update_gnomekderc("$o->{prefix}/usr/share/config/kdesktoprc", "Desktop0",
+ MultiWallpaperMode => "NoMulti",
+ Wallpaper => "/usr/share/mdk/oem-background.png",
+ WallpaperMode => "Scaled",
+ );
+ }
+ #- GNOME desktop background.
+ if (-e "$o->{prefix}/etc/gnome/config/Background") {
+ update_gnomekderc("$o->{prefix}/etc/gnome/config/Background", "Default",
+ wallpaper => "/usr/share/mdk/oem-background.png",
+ wallpaperAlign => "3",
+ );
+ }
+ }
+
if ($o->{blank} || $o->{updatemodules}) {
my @l = detect_devices::floppies_dev();