View Mail views the mail.txt file twice

[Steven Bagley <bagley at MIT-OZ>]

In zwei in Release 5.0 [Beta Test rev 4], FEP 18, imperial purple, on Lisp Machine Robot-4 (3600):

M-X View Mail views my mail twice.  this appears to be because in the
code for view mail
(SEND (FS:USER-HOMEDIR) ':POSSIBLE-MAIL-FILE-PATHNAMES) 
evaluates to 
(#<TOPS20-PATHNAME "OZ:PS:<BAGLEY>OLDMAIL.TXT"> #<TOPS20-PATHNAME "OZ:PS:<BAGLEY>BAGLEY.BABYL">)
both of which have an :inbox-pathname of 
#<TOPS20-PATHNAME "OZ:PS:<BAGLEY>MAIL.TXT.1">

So it looks at the same file twice.