copy-file-doesn't work (was: Tramp ftp bug (was: ange-ftp-name-format needs to be improved))

[Michael Albinus]

Katsumi Yamaoka <address@hidden> writes:

> Hi,
>
> I found one more problem which is concerned with Tramp ftp.
> When I started Emacs with the -q option and evaluated the
> following Lisp form, it caused an error.
>
> (copy-file "/tmp/FILE"
>          "/ftp:address@hidden:/tmp/")
>
> Debugger entered--Lisp error: (file-already-exists "File already exists" 
> "/tmp/FILE")
>   copy-file("/tmp/FILE" "/ftp:address@hidden:/tmp/")
>   eval((copy-file "/tmp/FILE" "/ftp:address@hidden:/tmp/"))
>   eval-last-sexp-1(t)
>   eval-last-sexp(t)
>   eval-print-last-sexp()
>   call-interactively(eval-print-last-sexp)
>
> The FILE was surely non-existent in the remotehost.

Hmm. Interesting enough, it doesn't seem to be related to Tramp or
ange-ftp. There's even the same problem copying the file locally:

(copy-file "~/.emacs" "/tmp/")

Debugger entered--Lisp error: (file-already-exists "File already exists" 
"/home/albinus/.emacs")
  copy-file("~/.emacs" "/tmp/")
  eval((copy-file "~/.emacs" "/tmp/"))
  eval-expression((copy-file "~/.emacs" "/tmp/") nil)
  call-interactively(eval-expression)

Of course, "/home/albinus/.emacs" does exists, and "/tmp/.emacs"
doesn't.

The problem is not evident with Emacs 21.3.

> Regards,

Best regards, Michael.