# HG changeset patch
# User Paul Eggert <eggert@twinsun.com>
# Date 1006991708 0
# Node ID 41d73d9565de6b6eeb7dc3ee071a302c79b074e9
# Parent  42271b6bfe3d90ee2bf6c226e9f02313cb0a773b
(Copyright): Add '(C)' as per coding guidelines.

The following changes are derived from suggestions by Bob Chapman
<rechapman@compuserve.com>.

(printlogline): Also allow tab and newline to separate
'(function):' from the rest of a comment.
(reformat the sorted log entries): Require date and author to
match the clumpname.

diff -r 42271b6bfe3d -r 41d73d9565de lib-src/ChangeLog
--- a/lib-src/ChangeLog	Wed Nov 28 22:34:20 2001 +0000
+++ b/lib-src/ChangeLog	Wed Nov 28 23:55:08 2001 +0000
@@ -1,3 +1,15 @@
+2001-11-28  Paul Eggert  <eggert@twinsun.com>
+
+	* rcs2log (Copyright): Add '(C)' as per coding guidelines.
+
+	The following changes are derived from suggestions by Bob Chapman
+	<rechapman@compuserve.com>.
+
+	* rcs2log (printlogline): Also allow tab and newline to separate
+	'(function):' from the rest of a comment.
+	(reformat the sorted log entries): Require date and author to
+	match the clumpname.
+
 2001-11-16  Gerd Moellmann  <gerd@gnu.org>
 
 	* ebrowse.c (matching_regexp): Escape '\\'.
diff -r 42271b6bfe3d -r 41d73d9565de lib-src/rcs2log
--- a/lib-src/rcs2log	Wed Nov 28 22:34:20 2001 +0000
+++ b/lib-src/rcs2log	Wed Nov 28 23:55:08 2001 +0000
@@ -29,9 +29,9 @@
 
 Report bugs to <bug-gnu-emacs@gnu.org>.'
 
-Id='$Id: rcs2log,v 1.47 2001/07/20 09:05:26 gerd Exp eggert $'
+Id='$Id: rcs2log,v 1.48 2001/09/05 23:07:46 eggert Exp $'
 
-# Copyright 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2001
+# Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2001
 #  Free Software Foundation, Inc.
 
 # This program is free software; you can redistribute it and/or modify
@@ -49,7 +49,7 @@
 # Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 # Boston, MA 02111-1307, USA.
 
-Copyright='Copyright 2001 Free Software Foundation, Inc.
+Copyright='Copyright (C) 2001 Free Software Foundation, Inc.
 This program comes with NO WARRANTY, to the extent permitted by law.
 You may redistribute copies of this program
 under the terms of the GNU General Public License.
@@ -491,7 +491,7 @@
 	#	* file: (function): comment
 	# to
 	#	* file (function): comment
-	if (Log ~ /^\([^)]*\): /) {
+	if (Log ~ /^\([^)]*\):[\t\n ]/) {
 		i = index(Log, ")")
 		filefunc = substr(Log, 1, i)
 		while ((j = index(filefunc, "\n"))) {
@@ -663,7 +663,7 @@
 				newclumpname = substr(newlog, 1, i)
 				while (substr(newlog, i+1) ~ /^['"$tab"' ]/) i++
 				newlog = substr(newlog, i+1)
-				if (clumpname == newclumpname) sep = ""
+				if (clumpname == newclumpname && date == $3 && author == $5) sep = ""
 			}
 			printf sep
 			clumpname = newclumpname