From 482ab34c78c638789f19a639eeda59303ab1c2b2 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Tue, 11 May 2004 16:24:28 +0000 Subject: [PATCH] added authentication stuff original commit: 78df7fec2bc5450d9e19e9b3ac8ae39d4e27ab23 --- collects/net/nntp-sig.ss | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/collects/net/nntp-sig.ss b/collects/net/nntp-sig.ss index c80d4e8..2fd7e4d 100644 --- a/collects/net/nntp-sig.ss +++ b/collects/net/nntp-sig.ss @@ -7,7 +7,7 @@ (define-signature net:nntp^ ((struct communicator (sender receiver server port)) connect-to-server connect-to-server* disconnect-from-server - open-news-group + authenticate-user open-news-group head-of-message body-of-message newnews-since generic-message-command make-desired-header extract-desired-headers @@ -20,6 +20,7 @@ (struct non-existent-group (group)) (struct article-not-in-group (article)) (struct no-group-selected ()) - (struct article-not-found (article))))) + (struct article-not-found (article)) + (struct authentication-rejected ()))))