Parent Directory | Revision Log | Patch
revision 1.4 by chupa, Sat Dec 7 14:01:23 2002 UTC | revision 1.5 by chupa, Sun Dec 8 13:33:38 2002 UTC | |
---|---|---|
# | Line 71 | Line 71 |
71 | ||
72 | (define (BBNLogin) | (define (BBNLogin) |
73 | (chat-try 20 | (chat-try 20 |
74 | '("login" (BBNTalkToNetwork)) | '("login" (BBNLogin2)) |
75 | '("NO CARRIER" (chat-failure)) | '("NO CARRIER" (chat-failure)) |
76 | '(else (chat-failure)))) | '(else (chat-failure)))) |
77 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |