From 84ffd8c092eb98129af51531280db83cab231de5 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Mon, 5 Jun 2000 18:29:16 +0000 Subject: [PATCH] Fix bug: a couple of places explicitly referenced the flag "\\recent" which was changed to "recent". --- v7/src/imail/imail-imap.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/v7/src/imail/imail-imap.scm b/v7/src/imail/imail-imap.scm index 6d3020fe5..c9a60be76 100644 --- a/v7/src/imail/imail-imap.scm +++ b/v7/src/imail/imail-imap.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; $Id: imail-imap.scm,v 1.109 2000/06/05 18:20:38 cph Exp $ +;;; $Id: imail-imap.scm,v 1.110 2000/06/05 18:29:16 cph Exp $ ;;; ;;; Copyright (c) 1999-2000 Massachusetts Institute of Technology ;;; @@ -663,7 +663,7 @@ (imap:command:uid-store-flags connection (imap-message-uid message) (map imail-flag->imap-flag - (flags-delete "\\recent" flags)))))) + (flags-delete "recent" flags)))))) (define (imap-flag->imail-flag flag) (let ((entry (assq flag standard-imap-flags))) @@ -1063,7 +1063,7 @@ (imap-url-mailbox url) (map imail-flag->imap-flag (flags-delete - "\\recent" + "recent" (message-flags message))) (message-internal-time message) (message->string message))))))))) -- 2.25.1