From 9a85819bad00420ca8cb5965021f0dd76ec565ad Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Tue, 23 Apr 2013 19:28:05 +0000
Subject: fix a crash when reloading partition table (mga#9838)

---
 perl-install/diskdrake/interactive.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install/diskdrake/interactive.pm')

diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 02ab8bdb1..011d61422 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -961,6 +961,7 @@ sub dmcrypt_open {
 sub detect_lvms_on_dmcrypt {
     my ($all_hds) = @_,
     require File::Temp;
+    require fs::dmcrypt;
     my (undef, $tmp_file) = File::Temp::mkstemp('/tmp/crypttab.XXXXXXX');
     fs::dmcrypt::save_crypttab_($all_hds, $tmp_file);
     $all_hds->{lvms} = [ fsedit::lvms($all_hds) ];
-- 
cgit v1.2.1