summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorJonathan Gotti <jgotti@mandriva.com>2002-09-16 12:52:44 +0000
committerJonathan Gotti <jgotti@mandriva.com>2002-09-16 12:52:44 +0000
commit8948d352fb70dd411d26b02081829b5a3a0d1a3c (patch)
treeb217d5dd5af78c4cfb92ca04ba933c31a03919df /perl-install
parent3bbfd98868f298676bb4ee6447222163382cff70 (diff)
downloaddrakx-8948d352fb70dd411d26b02081829b5a3a0d1a3c.tar
drakx-8948d352fb70dd411d26b02081829b5a3a0d1a3c.tar.gz
drakx-8948d352fb70dd411d26b02081829b5a3a0d1a3c.tar.bz2
drakx-8948d352fb70dd411d26b02081829b5a3a0d1a3c.tar.xz
drakx-8948d352fb70dd411d26b02081829b5a3a0d1a3c.zip
remove File::Copy dependencies and change lilo message path
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootlook.pm20
1 files changed, 10 insertions, 10 deletions
diff --git a/perl-install/bootlook.pm b/perl-install/bootlook.pm
index c535d649a..07d90b4fb 100644
--- a/perl-install/bootlook.pm
+++ b/perl-install/bootlook.pm
@@ -185,16 +185,16 @@ $thm_button->signal_connect('clicked',
sub {
my $error = 0;
my $boot_conf_file = '/etc/sysconfig/bootsplash';
- my $lilomsg = '/boot/lilo-graphic/message';
- #lilo installation
- if (-f $themes{'path'}.$combo{'lilo'}->entry->get_text() . $themes{'lilo'}{'file'}) {
- use File::Copy;
- ( copy($lilomsg,"/boot/lilo-graphic/message.old")
- and standalone::explanations(_("Backup %s to %s.old",$lilomsg,$lilomsg)) )
- or $in->ask_warn(_("Error"), _("unable to backup lilo message"));
- ( copy($themes{'path'} . $combo{'lilo'}->entry->get_text() . $themes{'lilo'}{'file'}, $lilomsg)
- and standalone::explanations(_("Copy %s to %s",$themes{'path'} . $combo{'lilo'}->entry->get_text() . $themes{'lilo'}{'file'},$lilomsg)) )
- or $in->ask_warn(_("Error"), _("can't change lilo message"));
+ my $lilomsg = '/boot/message-graphic';
+ #lilo installation
+ if (-f $themes{'path'}.$combo{'lilo'}->entry->get_text() . $themes{'lilo'}{'file'}) {
+ use MDK::Common::File;
+ standalone::explanations(_("Backup %s to %s.old",$lilomsg,$lilomsg));
+ cp_af($lilomsg,"/boot/message-graphic.old") ;
+ #can't use this anymore or $in->ask_warn(_("Error"), _("unable to backup lilo message"));
+ standalone::explanations(_("Copy %s to %s",$themes{'path'} . $combo{'lilo'}->entry->get_text() . $themes{'lilo'}{'file'},$lilomsg));
+ cp_af($themes{'path'} . $combo{'lilo'}->entry->get_text() . $themes{'lilo'}{'file'}, $lilomsg) ;
+ #can't use this anymore or $in->ask_warn(_("Error"), _("can't change lilo message"));
} else {
$error = 1;
$in->ask_warn(_("Error"), _("Lilo message not found"));