login fails

[Haines Brown]

I'm running debian sarge, emacs 21.3.1, and am attempting to set up
tramp. I'm currently using gFTP and can also access the host from a
command line FTP command.

In ~./emacs I have:

  (add-to-list 'load-path "/usr/share/emacs/site-lisp/tramp/")
  (require 'tramp)
  (setq tramp-default-method "ssh")

And I do:

  C-x C-f /address@hidden:/html]
  ftp> open ftp.hartford-hwp.com
  Connected to hartford-hwp.com.
  220 customer NcFTPd Server (licensed copy) ready.
  user "[USR1066" Turtle Power!
  Remote system type is UNIX.
  Using binary mode to transfer files.
  ftp> 331 User [USR1066 okay, need password.
  530 Login incorrect.
  Login failed.

The UID (usr1066) and pw do work from an FTP command. I have no doubt
that I'm using the correct pw, including case. Here's the debug (which
I don't understand): 

  Debugger entered--Lisp error: (ftp-error "FTP Error: USER request failed: 
        530 Login incorrect.")
  signal(ftp-error ("FTP Error: USER request failed: 530 Login incorrect."))
  ange-ftp-error("ftp.hartford-hwp.com" "[USR1066" "USER request failed: 
        530 Login incorrect.")
  ange-ftp-normal-login("ftp.hartford-hwp.com" "[USR1066" "BF527" "" 
        #<process *ftp address@hidden>)
  ange-ftp-get-process("ftp.hartford-hwp.com" "[USR1066")
  ange-ftp-host-type("ftp.hartford-hwp.com" "[USR1066")
  ange-ftp-ls("/address@hidden:/" "-al" t nil)
  ange-ftp-get-files("/address@hidden:/")
  ange-ftp-get-file-entry("/address@hidden:/html]/")
  ange-ftp-file-directory-p("/address@hidden:/html]")
  apply(ange-ftp-file-directory-p "/address@hidden:/html]")
  ange-ftp-hook-function(file-directory-p 
        "/address@hidden:/html]")
  apply(ange-ftp-hook-function file-directory-p 
        "/address@hidden:/html]")
  (cond ((memq operation ...) (apply ... operation args)) (t (let* ... ...)))
  (let ((ange-ftp-name-format ...) (ange-ftp-ftp-name-arg "") 
        (ange-ftp-ftp-name-res nil)) (cond (... ...) (t ...)))
  (progn (or (boundp ...) (require ...)) (let (... ... ...) (cond ... ...)))
  (unwind-protect (progn (or ... ...) (let ... ...)) 
        (set-match-data save-match-data-internal))
  (let ((save-match-data-internal ...)) (unwind-protect (progn ... ...) 
        (set-match-data save-match-data-internal)))
  (save-match-data (or (boundp ...) (require ...)) (let (... ... ...) 
        (cond ... ...)))
  tramp-ftp-file-name-handler(file-directory-p 
        "/address@hidden:/html]")
  apply(tramp-ftp-file-name-handler file-directory-p 
        "/address@hidden:/html]")
  (cond (foreign (apply foreign operation args)) 
        (t (tramp-run-real-handler operation args)))
  (let* ((filename ...) (foreign ...)) (cond (foreign ...) (t ...)))
  (progn (let* (... ...) (cond ... ...)))
  (unwind-protect (progn (let* ... ...)) 
        (set-match-data save-match-data-internal))
  (let ((save-match-data-internal ...)) (unwind-protect (progn ...) 
        (set-match-data save-match-data-internal)))
  (save-match-data (let* (... ...) (cond ... ...)))
  tramp-file-name-handler(file-directory-p 
        "/address@hidden:/html]")
  file-directory-p("/address@hidden:/html]")
  find-file-noselect("/address@hidden:/html]" nil nil 1)
  find-file("/address@hidden:/html]" 1)
  call-interactively(find-file)

Haines Brown