summaryrefslogtreecommitdiff
path: root/git-send-email.perl
diff options
context:
space:
mode:
authorJunio C Hamano <gitster@pobox.com>2010-09-29 20:50:02 (GMT)
committerJunio C Hamano <gitster@pobox.com>2010-09-29 20:50:02 (GMT)
commit34289ec35f2c9b1d7a1956e609a053f982e2ddd3 (patch)
tree34f78af744f6e6765d976dff491156ec008d947e /git-send-email.perl
parenta27d5bef56d0689873b29236addf4f7879e974ec (diff)
parent89bf1bace388c118137261e852635db92e607888 (diff)
downloadgit-34289ec35f2c9b1d7a1956e609a053f982e2ddd3.zip
git-34289ec35f2c9b1d7a1956e609a053f982e2ddd3.tar.gz
git-34289ec35f2c9b1d7a1956e609a053f982e2ddd3.tar.bz2
Merge branch 'ab/send-email-catfile'
* ab/send-email-catfile: send-email: use catfile() to concatenate files
Diffstat (limited to 'git-send-email.perl')
-rwxr-xr-xgit-send-email.perl3
1 files changed, 2 insertions, 1 deletions
diff --git a/git-send-email.perl b/git-send-email.perl
index e1f29a7..08c8c3c 100755
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -24,6 +24,7 @@ use Text::ParseWords;
use Data::Dumper;
use Term::ANSIColor;
use File::Temp qw/ tempdir tempfile /;
+use File::Spec::Functions qw(catfile);
use Error qw(:try);
use Git;
@@ -511,7 +512,7 @@ while (defined(my $f = shift @ARGV)) {
opendir(DH,$f)
or die "Failed to opendir $f: $!";
- push @files, grep { -f $_ } map { +$f . "/" . $_ }
+ push @files, grep { -f $_ } map { catfile($f, $_) }
sort readdir(DH);
closedir(DH);
} elsif ((-f $f or -p $f) and !check_file_rev_conflict($f)) {