suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

..

Browse Source 
original commit: 461070b850bcf9bb303842b089b844c3f3d88508
This commit is contained in:
Robby Findler 2002-04-11 12:51:06 +00:00
parent 0f16392602
commit 2a3e145cbc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/net/imap-unit.ss
View File

@ -194,7 +194,7 @@
(str->arg password))
void)])
(if (and (pair? reply) (tag-eq? 'NO (car reply)))
(error "username or password rejected by server")
(error "username or password rejected by server: ~s" reply)
(check-ok reply)))
(let ([imap (make-imap-connection r w)])