announce-gen perl 5.8.1 bug fix

[Simon Josefsson]

Index: announce-gen
===================================================================
RCS file: /cvsroot/coreutils/coreutils/announce-gen,v
retrieving revision 1.17
diff -u -p -u -w -r1.17 announce-gen
--- announce-gen        26 Aug 2003 07:19:57 -0000      1.17
+++ announce-gen        2 Oct 2003 19:34:36 -0000
@@ -175,7 +175,7 @@ sub print_changelog_deltas ($$)
      'current-version=s' => \$curr_version,
      'release-archive-directory=s' => \$release_archive_dir,
      'url-directory=s@' => address@hidden,
-     'news=s@' => \$news_file,
+     'news=s' => \$news_file,
 
      help => sub { usage 0 },
      version => sub { print "$ME version $VERSION\n"; exit },