Mercurial > emacs
changeset 16611:e746a7bd6376
(ange-ftp-normal-login): If using a smart gateway,
but ange-ftp-gateway-host is nil, generate the login name
in the usual simple way.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Fri, 06 Dec 1996 23:18:25 +0000 |
| parents | 45d75ca8dc40 |
| children | 64d5a9772d14 |
| files | lisp/ange-ftp.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ange-ftp.el Thu Dec 05 20:08:59 1996 +0000 +++ b/lisp/ange-ftp.el Fri Dec 06 23:18:25 1996 +0000 @@ -1926,7 +1926,8 @@ (cdr result)))) (setq result (ange-ftp-raw-send-cmd proc - (if (ange-ftp-use-smart-gateway-p host) + (if (and (ange-ftp-use-smart-gateway-p host) + ange-ftp-gateway-host) (format "user \"%s\"@%s %s %s" user nshost pass account) (format "user \"%s\" %s %s" user pass account)) (format "Logging in as user %s@%s" user host)))