[Fai-commit] r4840 - people/michael/features/setup_harddisks_2/implementation/lib

[mt at alioth.debian.org]

Author: mt
Date: 2008-01-25 19:15:23 +0000 (Fri, 25 Jan 2008)
New Revision: 4840

Modified:
   people/michael/features/setup_harddisks_2/implementation/lib/sizes.pm
Log:
convert_unit returns MB, not B


Modified: people/michael/features/setup_harddisks_2/implementation/lib/sizes.pm
===================================================================
--- people/michael/features/setup_harddisks_2/implementation/lib/sizes.pm	2008-01-25 17:18:48 UTC (rev 4839)
+++ people/michael/features/setup_harddisks_2/implementation/lib/sizes.pm	2008-01-25 19:15:23 UTC (rev 4840)
@@ -50,9 +50,8 @@
   use POSIX qw(ceil floor);
 
   my ($rstr, $size) = @_;
-  $FAI::debug and print "make_range called with $rstr, $size\n";
   # convert size to Bytes
-  my $size_b = &FAI::convert_unit($size);
+  my $size_b = &FAI::convert_unit($size) * 1024.0 * 1024.0;
   # check the format of the string
   ($rstr =~ /^(\d+%?)-(\d+%?)$/) or &FAI::internal_error("Invalid range");
   my ($start, $end) = ($1, $2);