summaryrefslogtreecommitdiff
path: root/perl
diff options
context:
space:
mode:
authorJay Soffian <jaysoffian@gmail.com>2009-01-13 17:41:35 -0500
committerJunio C Hamano <gitster@pobox.com>2009-01-13 22:52:35 -0800
commit8faea4f3b2f68a6ef168c6ada1627835380a570d (patch)
tree066e80a4f1f43109234e585803981fccd4fc25bd /perl
parent12dd1112886f18730ee471420619e77783cd5943 (diff)
downloadgit-8faea4f3b2f68a6ef168c6ada1627835380a570d.tar.gz
Git.pm: call Error::Simple() properly
The error message to Error::Simple() must be passed as a single argument. Signed-off-by: Jay Soffian <jaysoffian@gmail.com> Signed-off-by: Junio C Hamano <gitster@pobox.com>
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 ba94453781..29a17839f3 100644
--- a/perl/Git.pm
+++ b/perl/Git.pm
@@ -1012,8 +1012,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) {