summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake/resize_ntfs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-18 13:13:28 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-18 13:13:28 +0000
commit9c1b9e17bce32e9e0fc6748ad636339f0c6cb93a (patch)
tree5544b2d0ef648bcf1dd043852092a8d2908a9bbf /perl-install/diskdrake/resize_ntfs.pm
parentf857e49b00c270f098fea5265380d6079ac4ae01 (diff)
downloaddrakx-9c1b9e17bce32e9e0fc6748ad636339f0c6cb93a.tar
drakx-9c1b9e17bce32e9e0fc6748ad636339f0c6cb93a.tar.gz
drakx-9c1b9e17bce32e9e0fc6748ad636339f0c6cb93a.tar.bz2
drakx-9c1b9e17bce32e9e0fc6748ad636339f0c6cb93a.tar.xz
drakx-9c1b9e17bce32e9e0fc6748ad636339f0c6cb93a.zip
(resize): do a test resize before doing the real one
Diffstat (limited to 'perl-install/diskdrake/resize_ntfs.pm')
-rw-r--r--perl-install/diskdrake/resize_ntfs.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/diskdrake/resize_ntfs.pm b/perl-install/diskdrake/resize_ntfs.pm
index 30e860f6f..64d96ca7f 100644
--- a/perl-install/diskdrake/resize_ntfs.pm
+++ b/perl-install/diskdrake/resize_ntfs.pm
@@ -20,7 +20,9 @@ sub min_size {
sub resize {
my ($o, $size) = @_;
- run_program::run_or_die('ntfsresize', '-ff', '-s' . int($size / 2) . 'ki', $o->{dev});
+ my @l = ('-ff', '-s' . int($size / 2) . 'ki', $o->{dev});
+ run_program::run_or_die('ntfsresize', '-n', @l);
+ run_program::run_or_die('ntfsresize', @l);
}
1;