# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 904941496 0
# Node ID 945fed18ddb83993b77b7491ffb6de56b5961549
# Parent  973ac8db2f921fe9849eabc35ce3bc8dd317f678
(rmail-primary-inbox-list): Make the initial
value in the `repeat' alternative a list.

diff -r 973ac8db2f92 -r 945fed18ddb8 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Fri Sep 04 20:37:22 1998 +0000
+++ b/lisp/mail/rmail.el	Fri Sep 04 20:38:16 1998 +0000
@@ -187,9 +187,9 @@
   ;; Don't use backquote here, because we don't want to need it
   ;; at load time.
   :type (list 'choice '(const :tag "Default" nil)
-	      (list 'repeat ':value (or (getenv "MAIL")
-					(concat "/var/spool/mail/"
-						(getenv "USER")))
+	      (list 'repeat ':value (list (or (getenv "MAIL")
+					      (concat "/var/spool/mail/"
+						      (getenv "USER"))))
 		    'file))
   :group 'rmail-retrieve
   :group 'rmail-files)