From: Jim Meyering <jim@meyering.net>
Date: Wed, 22 Nov 2006 15:16:05 +0000 (+0100)
Subject: * announce-gen (print_news_deltas): Fix silly, but harmless typo:
X-Git-Tag: COREUTILS-6_7~39
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=5272c6daa181cf148e2dcddc54b0a6bdd3b4294c;p=thirdparty%2Fcoreutils.git

* announce-gen (print_news_deltas): Fix silly, but harmless typo:
change "(:?..." to "(?:..." in regexps.
---

diff --git a/ChangeLog b/ChangeLog
index bd8e4ffaf5..fde0d84fa5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2006-11-22  Jim Meyering  <jim@meyering.net>
 
+	* announce-gen (print_news_deltas): Fix silly, but harmless typo:
+	change "(:?..." to "(?:..." in regexps.
+
 	Post-release version change.
 	* NEWS: Add a line for 6.7-pre.
 	* configure.ac (AC_INIT): Bump to 6.7 and add "-pre" suffix.
diff --git a/announce-gen b/announce-gen
index 3330ad6ede..96774d9f6b 100755
--- a/announce-gen
+++ b/announce-gen
@@ -191,7 +191,7 @@ sub print_news_deltas ($$$)
   # the first occurrence of $prev_version.
   my $in_items;
 
-  my $re_prefix = qr/\* (:?Noteworthy|Major) change/;
+  my $re_prefix = qr/\* (?:Noteworthy|Major) change/;
 
   open NEWS, '<', $news_file
     or die "$ME: $news_file: cannot open for reading: $!\n";
@@ -202,7 +202,7 @@ sub print_news_deltas ($$$)
 	  # Match lines like these:
 	  # * Major changes in release 5.0.1:
 	  # * Noteworthy changes in release 6.6 (2006-11-22) [stable]
-	  $line =~ /^$re_prefix.*(:?[^\d.]|$)\Q$curr_version\E(:?[^\d.]|$)/o
+	  $line =~ /^$re_prefix.*(?:[^\d.]|$)\Q$curr_version\E(?:[^\d.]|$)/o
 	    or next;
 	  $in_items = 1;
 	  print $line;
@@ -212,7 +212,7 @@ sub print_news_deltas ($$$)
 	  # This regexp must not match version numbers in NEWS items.
 	  # For example, they might well say `introduced in 4.5.5',
 	  # and we don't want that to match.
-	  $line =~ /^$re_prefix.*(:?[^\d.]|$)\Q$prev_version\E(:?[^\d.]|$)/o
+	  $line =~ /^$re_prefix.*(?:[^\d.]|$)\Q$prev_version\E(?:[^\d.]|$)/o
 	    and last;
 	  print $line;
 	}