[mel-base-devel] EOF error on mel.mime:scan-forward-boundary-tag

[Fred Gibson]

When running (mel:parts (mel.mime::make-message-from-file filename)  I
was getting an end of file error.  I narrowed the problem down to peek
in mel.mime:scan-forward-boundary-tag, and got the function working by
changing:

    (flet ((peek ()
	     (peek-char nil in-stream))

to

    (flet ((peek ()
	     (peek-char nil in-stream nil :eof))

My best,

Fred Gibson

Founder / Software Developer
http://www.streamfocus.com

(c)2010 Organon Technologies LLC