X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Porting%2Fp4desc;h=0bf79da2e004b2df741c73b17cd2a382f796aca8;hb=1aeab75ab913b2442f1de7300d375422255ad122;hp=27f44f6af1f52f8757b9b436b9c90a6322f94560;hpb=c3e95679c8de75bca525d88bd0f2dcde6b95dccb;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/Porting/p4desc b/Porting/p4desc
index 27f44f6..0bf79da 100755
--- a/Porting/p4desc
+++ b/Porting/p4desc
@@ -65,7 +65,7 @@ my $cur = m|^Affected files| ... m|^Differences|;
 
 # while we are within range
 if ($cur) {
-    if (m|^\.\.\. (//depot/.+?#\d+) (add|branch)$|) {
+    if (m{^\.\.\. (//depot/.+?#\d+) (add|branch)$}) {
 	my $newfile = $1;
 	push @addfiles, $newfile;
 	warn "$newfile add, revision != 1!\n" unless $newfile =~ /#1$/;