[dovecot-cvs] dovecot/src/pop3 commands.c,1.25,1.26

[cras at dovecot.org]

Update of /home/cvs/dovecot/src/pop3
In directory talvi:/tmp/cvs-serv30219/pop3

Modified Files:
	commands.c 
Log Message:
Make RETR mark the message seen.



Index: commands.c
===================================================================
RCS file: /home/cvs/dovecot/src/pop3/commands.c,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -d -r1.25 -r1.26
--- commands.c	31 Aug 2004 08:17:08 -0000	1.25
+++ commands.c	2 Sep 2004 10:48:35 -0000	1.26
@@ -332,6 +332,7 @@
 {
         struct fetch_context *ctx;
 	struct mail *mail;
+	struct mail_full_flags seen_flag;
 
 	ctx = i_new(struct fetch_context, 1);
 
@@ -351,6 +352,13 @@
 		return;
 	}
 
+	if (body_lines == (uoff_t)-1) {
+		/* mark the message seen with RETR command */
+		memset(&seen_flag, 0, sizeof(seen_flag));
+		seen_flag.flags = MAIL_SEEN;
+		(void)mail->update_flags(mail, &seen_flag, MODIFY_ADD);
+	}
+
 	ctx->body_lines = body_lines;
 	if (body_lines == (uoff_t)-1) {
 		client_send_line(client, "+OK %"PRIuUOFF_T" octets",