summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mageia.org>2012-04-07 09:38:58 +0000
committerPascal Terjan <pterjan@mageia.org>2012-04-07 09:38:58 +0000
commitdf65b827db2208c0c21899b7580f86be989d9f09 (patch)
tree239ea8eebc53f3d22b42c06b21505d5a2e0aeae0
parentdf515bb56ed8006d0121994352a421ab4e0806f1 (diff)
downloaddrakx-backup-do-not-use-df65b827db2208c0c21899b7580f86be989d9f09.tar
drakx-backup-do-not-use-df65b827db2208c0c21899b7580f86be989d9f09.tar.gz
drakx-backup-do-not-use-df65b827db2208c0c21899b7580f86be989d9f09.tar.bz2
drakx-backup-do-not-use-df65b827db2208c0c21899b7580f86be989d9f09.tar.xz
drakx-backup-do-not-use-df65b827db2208c0c21899b7580f86be989d9f09.zip
Fix a warning by defining init before using it
-rw-r--r--perl-install/lvm.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm
index 6a6c250f9..e2eeb4cdc 100644
--- a/perl-install/lvm.pm
+++ b/perl-install/lvm.pm
@@ -29,8 +29,6 @@ sub cylinder_size {
$hd->{extent_size};
}
-init() or log::l("lvm::init failed");
-
sub detect_during_install() {
run_program::run('lvm2', 'vgscan');
run_program::run('lvm2', 'vgchange', '-a', 'y');
@@ -42,6 +40,8 @@ sub init() {
1;
}
+init() or log::l("lvm::init failed");
+
sub lvm_cmd {
if (my $r = run_program::run('lvm2', @_)) {
$r;