summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2007-10-18 09:38:39 +0000
committerOlivier Blin <oblin@mandriva.com>2007-10-18 09:38:39 +0000
commit089376cf52cdafde9c394aa59df6abcb2108dfed (patch)
tree9a8272301be8695f87cbc9f663edba24c4197b78
parent7c2e85249d3029d4ae618497fb081c72183384c9 (diff)
downloaddraklive-089376cf52cdafde9c394aa59df6abcb2108dfed.tar
draklive-089376cf52cdafde9c394aa59df6abcb2108dfed.tar.gz
draklive-089376cf52cdafde9c394aa59df6abcb2108dfed.tar.bz2
draklive-089376cf52cdafde9c394aa59df6abcb2108dfed.tar.xz
draklive-089376cf52cdafde9c394aa59df6abcb2108dfed.zip
make warn messages less verbose
-rwxr-xr-xdraklive16
1 files changed, 8 insertions, 8 deletions
diff --git a/draklive b/draklive
index ee64db8..b0b986c 100755
--- a/draklive
+++ b/draklive
@@ -964,7 +964,7 @@ sub prepare_bootloader {
cp_f(glob_(get_system_root($live) . "/usr/share/gfxboot/themes/$theme->{name}/*"), $syslinux_dir);
}
my $bootlogo = $syslinux_dir . '/bootlogo';
- warn "unable to find gfxboot splash ($bootlogo)" if ! -f $bootlogo;
+ warn "unable to find gfxboot splash ($bootlogo)\n" if ! -f $bootlogo;
output_p($syslinux_dir . '/gfxboot.cfg', "livecd=1\n");
run_({ root => get_system_root($live) }, '/usr/sbin/grub-gfxmenu', '--update-gfxmenu');
@@ -1086,7 +1086,7 @@ sub create_master {
if (my $create = get_boot_setting($live->{media}, 'create', $opts)) {
$create->($live, $opts);
} else {
- warn "not implemented yet";
+ warn "not implemented yet\n";
}
}
@@ -1117,7 +1117,7 @@ sub format_device {
if (my $format = get_boot_setting($live->{media}, 'format', $opts)) {
$format->($live, $opts);
} else {
- warn "not implemented yet";
+ warn "not implemented yet\n";
}
}
@@ -1184,7 +1184,7 @@ sub record_usb_master {
unlink $grub_device_map;
}
} else {
- warn "not running $bootloader on non block device $device";
+ warn "not running $bootloader on non block device $device\n";
}
do {
@@ -1233,7 +1233,7 @@ sub record_master {
if (my $record = get_boot_setting($live->{media}, 'record', $opts)) {
$record->($live, $opts);
} else {
- warn "not implemented yet";
+ warn "not implemented yet\n";
}
}
@@ -1246,7 +1246,7 @@ sub pipe_subs {
POSIX::dup2($r, 0) or die "couldn't dup2: $!\n";
POSIX::close($r);
$reader->();
- POSIX::close(0) or warn "writer exited $?";
+ POSIX::close(0) or warn "writer exited $?\n";
POSIX::dup2($stdin, 0) or die "couldn't dup2: $!\n";
waitpid($pid, 0);
} else {
@@ -1265,7 +1265,7 @@ sub record_onthefly {
my $record = get_storage_setting($live->{media}, 'record');
unless ($record) {
- warn "not implemented yet";
+ warn "not implemented yet\n";
return;
}
if (my $create = get_storage_setting($live->{media}, 'record_needs_master') && get_storage_setting($live->{media}, 'create')) {
@@ -1428,7 +1428,7 @@ sub read_config {
sub check_config {
my ($live) = @_;
unless (keys(%$live)) {
- warn 'no live definition';
+ warn "no live definition\n";
Pod::Usage::pod2usage();
}
#- check for minimum requirements