summaryrefslogtreecommitdiffstats
path: root/perl-install/fs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-07-13 16:23:45 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-07-13 16:23:45 +0000
commit39b51c96e54f880be2d2fb909f44118a6c209d7c (patch)
tree86b09fbe4e5042b5fa5b4269d79cf9042993a568 /perl-install/fs.pm
parent925e58d2b3b5fc4adeefcf9f7c3062ba5efde627 (diff)
downloaddrakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar
drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar.gz
drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar.bz2
drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.tar.xz
drakx-backup-do-not-use-39b51c96e54f880be2d2fb909f44118a6c209d7c.zip
*** empty log message ***
Diffstat (limited to 'perl-install/fs.pm')
-rw-r--r--perl-install/fs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index bf06934c2..18f6db4cb 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -68,7 +68,7 @@ sub format_ext2($;$) {
run_program::run("mke2fs", devices::make($dev), @options) or die "ext2 formatting of $dev failed";
}
-sub format_dos($;$) {
+sub format_dos($;$@) {
my ($dev, $bad_blocks, @options) = @_;
run_program::run("mkdosfs", devices::make($dev), @options, $bad_blocks ? "-c" : ()) or die "dos formatting of $dev failed";