From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 22 Apr 2000 01:54:48 +0000 (+0000)
Subject: First attempt at a parser for IMAP server responses.
X-Git-Tag: 20090517-FFI~3993
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=03efe258a0bafe29492e590f1db126c977e25635;p=mit-scheme.git

First attempt at a parser for IMAP server responses.
---

diff --git a/v7/src/imail/fake-env.scm b/v7/src/imail/fake-env.scm
index d4b5df9cc..6642c7a5d 100644
--- a/v7/src/imail/fake-env.scm
+++ b/v7/src/imail/fake-env.scm
@@ -6,7 +6,7 @@
 			       (in-package (package/environment package)
 				 (make-environment)))))))
   (new-child '(EDWIN) 'IMAIL)
-  (new-child '(EDWIN IMAIL) 'IMAP-response)
+  (new-child '(EDWIN IMAIL) 'IMAP-RESPONSE)
   (new-child '(EDWIN IMAIL) 'IMAP-SYNTAX)
   (new-child '(EDWIN IMAIL) 'PARSER)
   (new-child '(EDWIN IMAIL) 'REXP)