comparison lisp/ange-ftp.el @ 20015:d5c245242a88

(ange-ftp-name-format): Fix customize type. (ange-ftp-smart-gateway-port): Likewise.

20014:2ecea967337d

This is a list of the form \(REGEXP HOST USER NAME\),
where REGEXP is a regular expression matching
the full remote name, and HOST, USER, and NAME are the numbers of
parenthesized expressions in REGEXP for the components (in that order)."
  :group 'ange-ftp
  :type 'regexp)

;; ange-ftp-multi-skip-msgs should only match ###-, where ### is one of
;; the number codes corresponding to ange-ftp-good-msgs or ange-ftp-fatal-msgs.
;; Otherwise, ange-ftp will go into multi-skip mode, and never come out.

  :type 'boolean)

(defcustom ange-ftp-smart-gateway-port "21"
  "*Port on gateway machine to use when smart gateway is in operation."
  :group 'ange-ftp
  :type 'integer)

(defcustom ange-ftp-send-hash t
  "*If non-nil, send the HASH command to the FTP client."
  :group 'ange-ftp
  :type 'boolean)

20015:d5c245242a88

This is a list of the form \(REGEXP HOST USER NAME\),
where REGEXP is a regular expression matching
the full remote name, and HOST, USER, and NAME are the numbers of
parenthesized expressions in REGEXP for the components (in that order)."
  :group 'ange-ftp
  :type '(list regexp 
	       (integer :tag "Host group")
	       (integer :tag "User group")
	       (integer :tag "Name group")))

;; ange-ftp-multi-skip-msgs should only match ###-, where ### is one of
;; the number codes corresponding to ange-ftp-good-msgs or ange-ftp-fatal-msgs.
;; Otherwise, ange-ftp will go into multi-skip mode, and never come out.

  :type 'boolean)

(defcustom ange-ftp-smart-gateway-port "21"
  "*Port on gateway machine to use when smart gateway is in operation."
  :group 'ange-ftp
  :type 'string)

(defcustom ange-ftp-send-hash t
  "*If non-nil, send the HASH command to the FTP client."
  :group 'ange-ftp
  :type 'boolean)