more idomatic perl

master
Joey Hess 2009-12-04 13:13:41 -05:00
parent af3cc556ba
commit b8ed5e7228
1 changed files with 1 additions and 1 deletions

View File

@ -73,7 +73,7 @@ sub darcs_rev($) {
my $file = shift; # Relative to the repodir.
my $repodir = $config{srcdir};
return "" if (! file_in_vc($repodir, $file));
return "" unless file_in_vc($repodir, $file);
my $hash = darcs_info('hash', $repodir, $file);
return defined $hash ? $hash : "";
}