# file
my $filemime = File::MimeInfo::default($file);
if (defined($filemime) && $filemime eq 'text/plain') {
- cvs_runcvs(['add', $file]) ||
+ cvs_runcvs('add', $file) ||
warn("cvs add $file failed\n");
- } else {
+ }
+ else {
- cvs_runcvs(['add', '-kb', $file]) ||
+ cvs_runcvs('add', '-kb', $file) ||
warn("cvs add binary $file failed\n");
}
- } else {
+ }
+ else {
# directory
- cvs_runcvs(['add', $file]) ||
+ cvs_runcvs('add', $file) ||
warn("cvs add $file failed\n");
}
}