From 7231e62ee2d620751d43ea72eb3e390ac6ccfed9 Mon Sep 17 00:00:00 2001 From: Mathias Preiner Date: Fri, 7 Jul 2017 09:40:08 -0700 Subject: Escape left brace in regex in update-copyright script. --- contrib/update-copyright.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'contrib') diff --git a/contrib/update-copyright.pl b/contrib/update-copyright.pl index ba0b4313d..99472ff94 100755 --- a/contrib/update-copyright.pl +++ b/contrib/update-copyright.pl @@ -139,7 +139,7 @@ sub handleFile { my $authors = <$AUTHOR>; chomp $authors; close $AUTHOR; $_ = <$IN>; - if(m,^(%{)?/\*(\*| )\*\*\*,) { + if(m,^(%\{)?/\*(\*| )\*\*\*,) { print "updating\n"; if($file =~ /\.(y|yy|ypp|Y)$/) { print $OUT "%{/******************* */\n"; @@ -201,7 +201,7 @@ $line"; if($file =~ /\.(y|yy|ypp|Y)$/) { while(my $line = <$IN>) { chomp $line; - if($line =~ '\s*%{(.*)') { + if($line =~ '\s*%\{(.*)') { print $OUT "$1\n"; last; } -- cgit v1.2.3