X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=perl%2FGit.pm;h=7d7f2b1d367b505676032878615b2843eb64ed7b;hb=b32acd21d81ac792cf28d487b960a2f6bb0ef0e2;hp=ad0f5304450cb7acf86465027f5fd7046e2458b3;hpb=11b8a41c4569e99a57137cb2db4b642b57171797;p=git.git

diff --git a/perl/Git.pm b/perl/Git.pm
index ad0f53044..7d7f2b1d3 100644
--- a/perl/Git.pm
+++ b/perl/Git.pm
@@ -1011,8 +1011,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) {