summaryrefslogtreecommitdiffstats
path: root/perl-install/fs
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-01-12 12:46:56 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-01-12 12:46:56 +0000
commit4ebe2da6970ec8369c48a6893ad187de8144658f (patch)
tree68fd15ea8f0805f0530cb69166219d9008b4de68 /perl-install/fs
parenta67188c72c2d596820356e7d15aefd06d1ac4655 (diff)
downloaddrakx-4ebe2da6970ec8369c48a6893ad187de8144658f.tar
drakx-4ebe2da6970ec8369c48a6893ad187de8144658f.tar.gz
drakx-4ebe2da6970ec8369c48a6893ad187de8144658f.tar.bz2
drakx-4ebe2da6970ec8369c48a6893ad187de8144658f.tar.xz
drakx-4ebe2da6970ec8369c48a6893ad187de8144658f.zip
remove debug code
Diffstat (limited to 'perl-install/fs')
-rw-r--r--perl-install/fs/format.pm2
1 files changed, 0 insertions, 2 deletions
diff --git a/perl-install/fs/format.pm b/perl-install/fs/format.pm
index 7fd7d012e..7032f3413 100644
--- a/perl-install/fs/format.pm
+++ b/perl-install/fs/format.pm
@@ -84,13 +84,11 @@ sub part_raw {
my @args = ($cmd, @first_options, @options, devices::make($dev));
- my $time = time();
if ($cmd eq 'mke2fs' && $wait_message) {
mke2fs($wait_message, @args) or die N("%s formatting of %s failed", $fs_type, $dev);
} else {
run_program::raw({ timeout => 60 * 60 }, @args) or die N("%s formatting of %s failed", $fs_type, $dev);
}
- warn "$cmd took: ", formatTimeRaw(time() - $time);
if ($fs_type eq 'ext3') {
disable_forced_fsck($dev);