Fix typo in previous change.

diff --git a/v7/src/edwin/rmail.scm b/v7/src/edwin/rmail.scm
index 8c4d7170296633ae863169e7a1a7fb927ac1c61b..940c3524f4d621e50e7278fe1c64bad9ae27ba96 100644 (file)
--- a/v7/src/edwin/rmail.scm
+++ b/v7/src/edwin/rmail.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Id: rmail.scm,v 1.45 1995/10/12 22:54:32 cph Exp $
+;;;    $Id: rmail.scm,v 1.46 1995/10/12 23:12:17 cph Exp $
 ;;;
 ;;;    Copyright (c) 1991-95 Massachusetts Institute of Technology
 ;;;
@@ -660,7 +660,8 @@ This variable is ignored if rmail-pop-procedure is #F."
                         (list 'FILE
                               (->namestring
                                (merge-pathnames (cadr password)
-                                                (user-homedir-pathname))))))
+                                                (user-homedir-pathname))))
+                        #f))
                (else
                 (error "Illegal password value in rmail-pop-accounts entry:"
                        password))))