[dovecot-cvs] dovecot/src/lib-index mail-transaction-log.c, 1.37, 1.38

[cras at procontrol.fi]

Update of /home/cvs/dovecot/src/lib-index
In directory talvi:/tmp/cvs-serv16735/lib-index

Modified Files:
	mail-transaction-log.c 
Log Message:
bugfix for extra-records change



Index: mail-transaction-log.c
===================================================================
RCS file: /home/cvs/dovecot/src/lib-index/mail-transaction-log.c,v
retrieving revision 1.37
retrieving revision 1.38
diff -u -d -r1.37 -r1.38
--- mail-transaction-log.c	14 Jun 2004 04:27:44 -0000	1.37
+++ mail-transaction-log.c	20 Jun 2004 00:42:27 -0000	1.38
@@ -922,11 +922,12 @@
 
 	if (deleted) {
 		/* compress deleted appends away */
-		for (rec = dest = appends; rec != end; rec++) {
+		for (rec = dest = appends; rec != end; ) {
 			if (rec->uid != 0)
 				dest++;
 			else if (rec != dest)
 				*rec = *dest;
+			rec = PTR_OFFSET(rec, record_size);
 		}
 		buffer_set_used_size(t->appends,
 				     (char *)dest - (char *)appends);