summaryrefslogtreecommitdiffstats
path: root/perl-install
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
commit144659654bb94d3b534dcd4c4116c49ce2b32bb8 (patch)
tree239ea8eebc53f3d22b42c06b21505d5a2e0aeae0 /perl-install
parentdc5dbda245332fd7d50855ff2e427a7a2742b791 (diff)
downloaddrakx-144659654bb94d3b534dcd4c4116c49ce2b32bb8.tar
drakx-144659654bb94d3b534dcd4c4116c49ce2b32bb8.tar.gz
drakx-144659654bb94d3b534dcd4c4116c49ce2b32bb8.tar.bz2
drakx-144659654bb94d3b534dcd4c4116c49ce2b32bb8.tar.xz
drakx-144659654bb94d3b534dcd4c4116c49ce2b32bb8.zip
Fix a warning by defining init before using it
Diffstat (limited to 'perl-install')
-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;