# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1020052600 0
# Node ID edd77d3b98986e378cb4e07a106b7470d2cde090
# Parent  fd324d332ceb99cfdcc16e9c8dd68e15b221d73c
(ange-ftp-passive-host-alist)
(ange-ftp-bs2000-additional-pubsets):  Fix custom type.

diff -r fd324d332ceb -r edd77d3b9898 lisp/net/ange-ftp.el
--- a/lisp/net/ange-ftp.el	Mon Apr 29 03:55:57 2002 +0000
+++ b/lisp/net/ange-ftp.el	Mon Apr 29 03:56:40 2002 +0000
@@ -1009,9 +1009,9 @@
 SETTING is \"on\" to turn passive mode on, \"off\" to turn it off,
 or nil meaning don't change it."
   :group 'ange-ftp
-  :type '(list (cons regex (choice (const :tag "On" "on")
-				   (const :tag "Off" "off")
-				   (const :tag "Don't change" nil))))
+  :type '(repeat (cons regexp (choice (const :tag "On" "on")
+				      (const :tag "Off" "off")
+				      (const :tag "Don't change" nil))))
   :version 21.3)
 
 ;;;; ------------------------------------------------------------
@@ -6111,7 +6111,7 @@
   nil
   "*List of additional pubsets available to all users."
   :group 'ange-ftp
-  :type 'string)
+  :type '(repeat string))
 
 ;; These parsing functions are as general as possible because the syntax
 ;; of ftp listings from BS2000 hosts is a bit erratic. What saves us is that