drakx - Mageia Installer and base platform for many utilities

index : drakx

Mageia Installer and base platform for many utilities

Thierry Vignaud [tv]

summary refs log tree commit diff stats

path: root/perl-install/network/netconnect.pm

diff options

Diffstat (limited to 'perl-install/network/netconnect.pm')

0 files changed, 0 insertions, 0 deletions

$in) = @_; $::isInstall || $in->do_pkgs->ensure_binary_is_installed('ntfsprogs', 'ntfsresize'); } 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;


context:
space:
mode: