From 4ebe2da6970ec8369c48a6893ad187de8144658f Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 12 Jan 2005 12:46:56 +0000
Subject: remove debug code

---
 perl-install/fs/format.pm | 2 --
 1 file changed, 2 deletions(-)

(limited to 'perl-install/fs')

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);
-- 
cgit v1.2.1