(util_mark_read): New function

 /* GNU Mailutils -- a suite of utilities for electronic mail
-   Copyright (C) 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
+   Copyright (C) 1999, 2000, 2001, 2002, 2005 Free Software Foundation, Inc.
 
    GNU Mailutils is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -327,6 +327,8 @@ void util_run_cached_commands __P((list_t *list));
 const char *util_reply_prefix __P((void));
 void util_rfc2047_decode __P((char **value));
 
+void util_mark_read __P((message_t msg));
+
 extern int ml_got_interrupt __P ((void));
 extern void ml_clear_interrupt __P ((void));
 extern void ml_readline_init __P ((void));

 /* GNU Mailutils -- a suite of utilities for electronic mail
    Copyright (C) 1999, 2000, 2001, 2002, 2003,
-   2004 Free Software Foundation, Inc.
+   2004, 2005 Free Software Foundation, Inc.
 
    GNU Mailutils is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -604,6 +604,16 @@ util_isdeleted (size_t n)
   return attribute_is_deleted (attr);
 }
 
+void
+util_mark_read (message_t msg)
+{
+  attribute_t attr;
+
+  message_get_attribute (msg, &attr);
+  attribute_set_read (attr);
+  attribute_set_userflag (attr, MAIL_ATTRIBUTE_SHOWN);
+}
+
 char *
 util_get_homedir ()
 {
@@ -1392,3 +1402,4 @@ util_rfc2047_decode (char **value)
       *value = tmp;
     }
 }
+