# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 849914305 0
# Node ID e746a7bd63768f7e31235660a8f4fbbb825a77d0
# Parent  45d75ca8dc40bbb504c7d94161323ca8a22660ac
(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.

diff -r 45d75ca8dc40 -r e746a7bd6376 lisp/ange-ftp.el
--- 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)))