# [PATCH] cvsimport: silence regex warning appearing in Perl 5.22.

1 messages from 2015-06-24 to 2015-06-24. Participants: Christian Neukirchen.
Thread: https://gitlist.dev/t/39709

## Christian Neukirchen, 2015-06-24 14:04

Subject: [PATCH] cvsimport: silence regex warning appearing in Perl 5.22.
Message-ID: <1435154660-17735-1-git-send-email-chneukirchen@gmail.com>
URL: https://gitlist.dev/e/1435154660-17735-1-git-send-email-chneukirchen%40gmail.com

```
Since Perl 5.22, "A literal '{' should now be escaped in a pattern".
Silence the recently added warning by using \{ instead.

Signed-off-by: Christian Neukirchen <chneukirchen@gmail.com>
---
 git-cvsimport.perl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/git-cvsimport.perl b/git-cvsimport.perl
index 73d367c..8a68777 100755
--- a/git-cvsimport.perl
+++ b/git-cvsimport.perl
@@ -921,7 +921,7 @@ sub commit {
 		# (See check_refname_component in refs.c.)
 		1 while $xtag =~ s/
 			(?: \.\.        # Tag cannot contain '..'.
-			|   \@{         # Tag cannot contain '@{'.
+			|   \@\{        # Tag cannot contain '@{'.
 			| ^ -           # Tag cannot begin with '-'.
 			|   \.lock $    # Tag cannot end with '.lock'.
 			| ^ \.          # Tag cannot begin...
-- 
2.4.4

```