From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 8 May 2000 14:02:46 +0000 (+0000)
Subject: Fix bug: FETCH response did not contain the message index as it is
X-Git-Tag: 20090517-FFI~3923
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=7e4bc31b223bf919d44f624e92652022e25a1f85;p=mit-scheme.git

Fix bug: FETCH response did not contain the message index as it is
supposed to.
---

diff --git a/v7/src/imail/imail.pkg b/v7/src/imail/imail.pkg
index 866eeadae..305a986d1 100644
--- a/v7/src/imail/imail.pkg
+++ b/v7/src/imail/imail.pkg
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: imail.pkg,v 1.26 2000/05/08 04:29:42 cph Exp $
+;;; $Id: imail.pkg,v 1.27 2000/05/08 14:02:46 cph Exp $
 ;;;
 ;;; Copyright (c) 2000 Massachusetts Institute of Technology
 ;;;
@@ -164,6 +164,7 @@
 	  imap:response:expunge-index
 	  imap:response:expunge?
 	  imap:response:fetch-attribute
+	  imap:response:fetch-index
 	  imap:response:fetch?
 	  imap:response:flags
 	  imap:response:flags?