summaryrefslogtreecommitdiffstats
path: root/perl-install/fsedit.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-02-21 18:00:59 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-02-21 18:00:59 +0000
commit512c92973dc5eceae594bd389350a1ab16da7981 (patch)
treee5a3cf0ec14607fcfe36b1764c740977b79f7feb /perl-install/fsedit.pm
parentdfeb8ebdc3f035b35e24dda340244a2ffbfeeff1 (diff)
downloaddrakx-512c92973dc5eceae594bd389350a1ab16da7981.tar
drakx-512c92973dc5eceae594bd389350a1ab16da7981.tar.gz
drakx-512c92973dc5eceae594bd389350a1ab16da7981.tar.bz2
drakx-512c92973dc5eceae594bd389350a1ab16da7981.tar.xz
drakx-512c92973dc5eceae594bd389350a1ab16da7981.zip
cleanup Data::Dumper use
Diffstat (limited to 'perl-install/fsedit.pm')
-rw-r--r--perl-install/fsedit.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index d12d17107..5dd145e78 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -11,7 +11,6 @@ use common qw(:common :constant :functional :file);
use partition_table qw(:types);
use partition_table_raw;
use detect_devices;
-use Data::Dumper;
use fsedit;
use devices;
use loopback;
@@ -308,6 +307,7 @@ sub auto_allocate {
sub undo_prepare($) {
my ($hds) = @_;
+ require Data::Dumper;
$Data::Dumper::Purity = 1;
foreach (@$hds) {
my @h = @{$_}{@partition_table::fields2save};