summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@gmail.com>2015-04-25 12:31:15 +0000
committerPascal Terjan <pterjan@gmail.com>2015-04-26 13:52:40 +0000
commitb15e9859d769017892931f2c3889131372fb1f49 (patch)
tree2521164aaa7673cb755e433833c3effb70f4e8d0 /perl-install
parentd144c121382c813c1c01dc63c583343676d5f629 (diff)
downloaddrakx-b15e9859d769017892931f2c3889131372fb1f49.tar
drakx-b15e9859d769017892931f2c3889131372fb1f49.tar.gz
drakx-b15e9859d769017892931f2c3889131372fb1f49.tar.bz2
drakx-b15e9859d769017892931f2c3889131372fb1f49.tar.xz
drakx-b15e9859d769017892931f2c3889131372fb1f49.zip
Revert "Do not die if /proc/partitions knows more than us"
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fs/proc_partitions.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fs/proc_partitions.pm b/perl-install/fs/proc_partitions.pm
index f1e4cd7a2..e4a15983e 100644
--- a/perl-install/fs/proc_partitions.pm
+++ b/perl-install/fs/proc_partitions.pm
@@ -64,7 +64,7 @@ sub compare {
if (find { $_->{pt_type} == 0xbf } @l1) {
log::l("not using /proc/partitions because of the presence of solaris extended partition"); #- cf #33866
} else {
- printf(
+ die sprintf(
"/proc/partitions does not agree with drakx %d != %d:\n%s\n", $len1, $len2,
"/proc/partitions: " . join(", ", map { "$_->{device} ($_->{rootDevice})" } @l2));
}