>
>I'm gonna have to wait till I hit another message I can't 
>download to test this out. I had another one like this 
>last week, and I just deleted it from the pop server so I 
>could download all the other messages.  For reference, 
>this troublesome message was 16674 octets long.

Well, I'm stuck again.  I can't retrieve message 3 from my 
pop server.  Here's the session:

>> rebol/version
== 1.0.2.3.1
>> mailbox: open pop://userid:[EMAIL PROTECTED]
>> probe mailbox/locals

make object! [
     total-size: 1046586
     sizes: [1 2357
         2 7735
         3 14992
         4 2475
         5 5430
         6 4813
         7 6487
         8 2445
         9 835
         10 21810
         11 2974
         12 5832
         13 2518
(escape)
>> eml: pick mailbox 2
reading messageno 2  size:  7736
== {Return-Path: 
<[EMAIL PROTECTED]>
Received: from n35.grp.scd.yahoo.c...
>> eml: pick mailbox 5
reading messageno 5  size:  5431
== {Return-Path: 
<[EMAIL PROTECTED]>
Received: from n18.grp.scd.yahoo.c...
>> eml: pick mailbox 3
reading messageno 3  size:  14993
Got none .. aborting
== {Return-Path: 
<[EMAIL PROTECTED]>
Received: from n33.grp.scd.yahoo.c...
>> eml: pick mailbox 2
reading messageno 2  size:  7736
** User Error: Server error: tcp connection failed
** Near: eml: pick mailbox 2
>>

I tracked the problem down to 

read-til-dot: func [port buf][
   while [(line: system/words/pick port/sub-port 1) <> 
"."] [
       if none? line [ print "Got none .. aborting" break 
]
       insert tail buf line
       insert tail buf newline
   ]
   buf
]

where /pick port 1 returns none ... and keeps returning 
none in an endless loop.

I put the above trap in the function, but then get a tcp 
error, as can be seen when I then do 
   
   pick mailbox 2

Does anyone knowledgeable in matters Rebol tcp have a work 
round for me?

--
Graham Chiu
-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to