package diskdrake::resize_ntfs; use diagnostics; use strict; use run_program; use common; sub new { my ($type, $_device, $dev) = @_; bless { dev => $dev }, $type; } sub min_size { my ($o) = @_; my $r; run_program::run('ntfsresize', '>', \$r, '-f', '-i', $o->{dev}) or die "ntfsresize failed:\n$r\n"; $r =~ /minimal size: (\d+) KiB/ && $1 * 2 } sub resize { my ($o, $size) = @_; my @l = ('-ff', '-s' . int($size / 2) . 'ki', $o->{dev}); my $r; run_program::run('ntfsresize', '>', \$r, '-n', @l) or die "ntfsresize failed: $r\n"; run_program::run('ntfsresize', '>', \$r, @l) or die "ntfsresize failed: $r\n"; } 1; href='/'>index : drakx
Mageia Installer and base platform for many utilitiesThierry Vignaud [tv]
summaryrefslogtreecommitdiffstats
path: root/perl-install/share/po/is.po
diff options
context:
space:
mode:
authorPablo Saratxaga <pablo@mandriva.com>2003-05-16 15:55:38 +0000
committerPablo Saratxaga <pablo@mandriva.com>2003-05-16 15:55:38 +0000
commit411e0e9d500d91cf111fb93209acd7d461ee2453 (patch)
tree2ad2bc9508b90d8be8a0dc571ee75b43be5b0019 /perl-install/share/po/is.po
parent1af0da3b2f30c11993aaefd4a9271768cb2e1bf3 (diff)
downloaddrakx-411e0e9d500d91cf111fb93209acd7d461ee2453.tar
drakx-411e0e9d500d91cf111fb93209acd7d461ee2453.tar.gz
drakx-411e0e9d500d91cf111fb93209acd7d461ee2453.tar.bz2
drakx-411e0e9d500d91cf111fb93209acd7d461ee2453.tar.xz
drakx-411e0e9d500d91cf111fb93209acd7d461ee2453.zip
updated pot file
Diffstat (limited to 'perl-install/share/po/is.po')