summaryrefslogtreecommitdiff
path: root/perl
diff options
context:
space:
mode:
authorJunio C Hamano <gitster@pobox.com>2009-01-13 23:10:50 -0800
committerJunio C Hamano <gitster@pobox.com>2009-01-13 23:10:50 -0800
commit4f8b8992ef0c009822cdca18d32ddf3a124ee284 (patch)
treed6688aedd217cdd9f46962af57432265e9b5ccff /perl
parent885a1ffb936cb8e32a15413a9a2404a4b4200f62 (diff)
parent3d1d81eba29d5cfc5b214dc049b743ffbe032ef4 (diff)
downloadgit-4f8b8992ef0c009822cdca18d32ddf3a124ee284.tar.gz
Merge branch 'maint-1.6.0' into maint
* maint-1.6.0: fast-import: Cleanup mode setting. Git.pm: call Error::Simple() properly
Diffstat (limited to 'perl')
-rw-r--r--perl/Git.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl/Git.pm b/perl/Git.pm
index 8392a68333..e9f8c9c048 100644
--- a/perl/Git.pm
+++ b/perl/Git.pm
@@ -1010,8 +1010,8 @@ sub _temp_cache {
my $temp_fd = \$TEMP_FILEMAP{$name};
if (defined $$temp_fd and $$temp_fd->opened) {
if ($TEMP_FILES{$$temp_fd}{locked}) {
- throw Error::Simple("Temp file with moniker '",
- $name, "' already in use");
+ throw Error::Simple("Temp file with moniker '" .
+ $name . "' already in use");
}
} else {
if (defined $$temp_fd) {