From c66ff549a5f1d4cae30795c5a7b062eeb7bf80d7 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 22 Sep 2003 08:30:32 +0000 Subject: - fix typo - add CVS Id --- rescue/tree/etc/oem-all | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/rescue/tree/etc/oem-all b/rescue/tree/etc/oem-all index 7b87a4560..c02d505f3 100755 --- a/rescue/tree/etc/oem-all +++ b/rescue/tree/etc/oem-all @@ -1,5 +1,7 @@ #!/usr/bin/perl +#- $Id$ + if (shift(@ARGV) ne '-f') { print "Call it with option -f, but don't fear loosing all your data, this command is dangerous!"; print " @@ -153,7 +155,7 @@ sub correct_start_end { my ($cylinder_size, $c_start, $c_end) = ($sectors*$heads*512/1024/1024, undef, undef); if (abs($cylinder_size*$cylinders-$hd_size)/$hd_size < 0.01) { $c_start = $$rstart+($keep_start ? 0 : $cylinder_size/$heads); - $c_end = $cylinder_size*int(1/2+$end/$cylinder_size); + $c_end = $cylinder_size * int(1 / 2 + $end / $cylinder_size); $c_end > $hd_size and $c_end = $hd_size; $$rstart = $c_end; } else { @@ -565,7 +567,7 @@ system "rpm", "--root", "/mnt", "--initdb"; #- copy and install from each cd image. foreach my $medium (@media) { - my $rpmsidr = $medium->{rpmsdir}; + my $rpmsdir = $medium->{rpmsdir}; $rpmsdir =~ s|%{ARCH}.*||; #- only for checking directory presence... while ($cd && ! -d "/cdrom/$rpmsdir") { system "unmount", "/dev/$cd"; -- cgit v1.2.1