1 files changed, 1 insertions, 1 deletions
diff --git a/tools/addchangelog.pl b/tools/addchangelog.pl
index 27befd6d8..2190e44d2 100755
--- a/tools/addchangelog.pl
+++ b/tools/addchangelog.pl
@@ -12,7 +12,7 @@ $date = (split('/', `grep ChangeLog perl-install/CVS/Entries`))[3];
 open F, ">perl-install/ChangeLog";
 print F foreach @changelog, @before;
 
-`cvs commit -m '' perl-install/ChangeLog >/dev/null` =~ /new revision: (.*$);/;
+`cvs commit -m '' perl-install/ChangeLog` =~ /new revision: (.*?);/;
 
 print "$1\n";
 print foreach @changelog;