tramp (2.1.19-pre); gvfs-copy dislikes empty arguments

[Magnus Henoch]

Enter your bug report in this message, including as much detail
as you possibly can about the problem, what you did to cause it
and what the local and remote machines are.

If you can give a simple set of instructions to make this bug
happen reliably, please include those.  Thank you for helping
kill bugs in Tramp.

Before reproducing the bug, you might apply

  M-x tramp-cleanup-all-connections

This allows to investigate from a clean environment.  Another
useful thing to do is to put

  (setq tramp-verbose 8)

in the ~/.emacs file and to repeat the bug.  Then, include the
contents of the *tramp/foo* buffer and the *debug tramp/foo*
buffer in your bug report.

--bug report follows this line--

I found that under certain circumstances (triggered by M-x
org-mobile-push), gvfs-copy would be called with an empty first argument
(note the double space in the debug output) while copying a file to
another file.  This patch seems to fix the problem:

--- tramp-gvfs.el.~1.36.~       2010-06-04 12:09:30.000000000 +0100
+++ tramp-gvfs.el       2010-07-10 16:27:05.000000000 +0100
@@ -551,11 +551,14 @@
         (tramp-message v 4 "`copy-file' failed, trying `gvfs-copy'")
         (unless
             (zerop
-             (tramp-gvfs-send-command
-              v "gvfs-copy"
-              (if (or keep-date preserve-uid-gid) "--preserve" "")
-              (tramp-gvfs-url-file-name filename)
-              (tramp-gvfs-url-file-name newname)))
+             (let ((args
+                    (append (if (or keep-date preserve-uid-gid)
+                                (list "--preserve")
+                              nil)
+                            (list
+                             (tramp-gvfs-url-file-name filename)
+                             (tramp-gvfs-url-file-name newname)))))
+             (apply 'tramp-gvfs-send-command v "gvfs-copy" args)))
           ;; Propagate the error.
           (tramp-error v (car err) "%s" (cdr err)))))))
 


16:13:47.422573 tramp-gvfs-send-command (6) # gvfs-copy  
file:/home/magnus/org/bank.org dav://address@hidden/org/bank.org
16:13:47.640997 tramp-gvfs-send-command (6) # Target 
dav://address@hidden/org/bank.org is not a directory
Usage:
  gvfs-copy [OPTION...] SOURCE... DEST - copy file(s) from SOURCE to DEST

Help Options:
  -h, --help                    Show help options

Application Options:
  -T, --no-target-directory     no target directory
  -p, --progress                show progress
  -i, --interactive             prompt before overwrite
  --preserve                    preserve all attributes
  -b, --backup                  backup existing destination files
  -P, --no-dereference          never follow symbolic links

16:13:47.641625 tramp-gvfs-handle-copy-file (1) # File error: (Opening output 
file operation not supported /home/magnus/.gvfs/WebDAV on XXX/bank.org)



Emacs  : GNU Emacs 23.1.92.1 (i686-pc-linux-gnu, GTK+ Version 2.12.9)
 of 2010-02-14 on infaneto
Package: tramp (2.1.19-pre)

current state:
==============
(setq
 tramp-current-method "dav"
 tramp-current-user "XXX"
 tramp-current-host "XXX"
 tramp-auto-save-directory nil
 tramp-default-method "scpc"
 tramp-default-method-alist '((nil "%" "smb")
                              ("" "\\`\\(anonymous\\|ftp\\)\\'" "ftp")
                              ("\\`ftp\\." "" "ftp")
                              ("\\`localhost\\'" "\\`root\\'" "su"))
 tramp-default-host "infaneto"
 tramp-default-proxies-alist nil
 tramp-default-user nil
 tramp-default-user-alist '(("imaps" nil "magnus") ("imap" nil "magnus")
                            ("socks" nil "magnus") ("tunnel" nil "magnus")
                            ("synce" nil nil) ("fish" nil "magnus")
                            ("smb" nil "") ("\\`su\\(do\\)?\\'" nil "root")
                            ("\\`r\\(em\\)?\\(cp\\|sh\\)\\|telnet\\|plink1?\\'"
                             nil "magnus")
                            )
 tramp-rsh-end-of-line "\n"
 tramp-default-password-end-of-line "\n"
 tramp-login-prompt-regexp ".*ogin\\( .*\\)?: *"
 tramp-password-prompt-regexp "(base64-decode-string 
\"Xi4qXChbcFBdYXNzd29yZFx8W3BQXWFzc3BocmFzZVwpLio6AD8gKg==\""
 tramp-wrong-passwd-regexp "^.*\\(Connection 
\\(?:\\(?:clo\\|refu\\)sed\\)\\|Host key verification failed\\.\\|Login 
\\(?:[Ii]ncorrect\\)\\|N\\(?:ame or service not known\\|o supported 
authentication methods left to try!\\)\\|Permission denied\\|\\(?:Sorry, try 
again\\|Timeout, server not responding\\)\\.\\).*\\|^.*\\(Received signal 
[0-9]+\\).*"
 tramp-yesno-prompt-regexp "\\(Are you sure you want to continue connecting 
(yes/no)\\?\\)\\s-*"
 tramp-yn-prompt-regexp "\\(\\(?:Store key in cache\\? (y/\\|Update cached 
key\\? (y/n, Return cancels connectio\\)n)\\)\\s-*"
 tramp-terminal-prompt-regexp "\\(TERM = (.*)\\|Terminal type\\? 
\\[.*\\]\\)\\s-*"
 tramp-temp-name-prefix "tramp."
 tramp-file-name-structure '("^/\\(\\([a-zA-Z_0-9-]+\\):\\)?\\(\\([^:/  
]+\\)@\\)?\\(\\([a-zA-Z0-9_.-]+\\|\\[\\(?:\\(?:[a-zA-Z0-9]+\\)?:\\)+[a-zA-Z0-9.]+]\\)\\(#[0-9]+\\)?\\)?:\\(.*$\\)"
 2 4 5 8)
 tramp-file-name-regexp "\\`/\\([^[/:]+\\|[^/]+]\\):"
 tramp-methods '(("imaps" (tramp-default-port 993))
                 ("imap" (tramp-default-port 143)) ("synce") ("obex") ("davs")
                 ("dav") ("fish") ("smb") ("ftp")
                 ("rcp" (tramp-login-program "rsh")
                  (tramp-login-args (("%h") ("-l" "%u")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program "rcp")
                  (tramp-copy-args (("-p" "%k") ("-r"))) (tramp-copy-keep-date 
t)
                  (tramp-copy-recursive t) (tramp-password-end-of-line nil))
                 ("scp" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "scp")
                  (tramp-copy-args (("-P" "%p") ("-p" "%k") ("-q") ("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t)
                  (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scp1" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-1" "-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "scp")
                  (tramp-copy-args (("-1") ("-P" "%p") ("-p" "%k") ("-q") 
("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t)
                  (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scp2" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-2" "-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "scp")
                  (tramp-copy-args (("-2") ("-P" "%p") ("-p" "%k") ("-q") 
("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t)
                  (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scp1_old" (tramp-login-program "ssh1")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program "scp1")
                  (tramp-copy-args (("-p" "%k") ("-r"))) (tramp-copy-keep-date 
t)
                  (tramp-copy-recursive t) (tramp-password-end-of-line nil))
                 ("scp2_old" (tramp-login-program "ssh2")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program "scp2")
                  (tramp-copy-args (("-p" "%k") ("-r"))) (tramp-copy-keep-date 
t)
                  (tramp-copy-recursive t) (tramp-password-end-of-line nil))
                 ("sftp" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "sftp") (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil))
                 ("rsync" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "rsync")
                  (tramp-copy-args (("-e" "ssh") ("-t" "%k") ("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-keep-tmpfile t)
                  (tramp-copy-recursive t) (tramp-password-end-of-line nil))
                 ("rsyncc" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p")
                    ("-o" "address@hidden:%%p")
                    ("-o" "ControlMaster=yes") ("-e" "none"))
                   )
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "rsync")
                  (tramp-copy-args (("-t" "%k") ("-r")))
                  (tramp-copy-env
                   (("RSYNC_RSH")
                    ("ssh -o address@hidden:%%p -o ControlMaster=auto"))
                   )
                  (tramp-copy-keep-date t) (tramp-copy-keep-tmpfile t)
                  (tramp-copy-recursive t) (tramp-password-end-of-line nil))
                 ("remcp" (tramp-login-program "remsh")
                  (tramp-login-args (("%h") ("-l" "%u")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program "rcp")
                  (tramp-copy-args (("-p" "%k"))) (tramp-copy-keep-date t)
                  (tramp-password-end-of-line nil))
                 ("rsh" (tramp-login-program "rsh")
                  (tramp-login-args (("%h") ("-l" "%u")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line nil))
                 ("ssh" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program nil) (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("ssh1" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-1" "-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program nil) (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("ssh2" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-2" "-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program nil) (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("ssh1_old" (tramp-login-program "ssh1")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program nil) (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil))
                 ("ssh2_old" (tramp-login-program "ssh2")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p") ("-e" "none")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line nil))
                 ("remsh" (tramp-login-program "remsh")
                  (tramp-login-args (("%h") ("-l" "%u")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line nil))
                 ("telnet" (tramp-login-program "telnet")
                  (tramp-login-args (("%h") ("%p"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program nil) (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil)
                  (tramp-default-port 23))
                 ("su" (tramp-login-program "su")
                  (tramp-login-args (("-") ("%u"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program nil) (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil))
                 ("sudo" (tramp-login-program "sudo")
                  (tramp-login-args
                   (("-u" "%u") ("-s") ("-H") ("-p" "Password:")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line nil))
                 ("scpc" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p")
                    ("-o" "address@hidden:%%p")
                    ("-o" "ControlMaster=yes") ("-e" "none"))
                   )
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "scp")
                  (tramp-copy-args
                   (("-P" "%p") ("-p" "%k") ("-q")
                    ("-o" "address@hidden:%%p")
                    ("-o" "ControlMaster=auto"))
                   )
                  (tramp-copy-keep-date t) (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scpx" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p")
                    ("-e" "none" "-t" "-t" "/bin/sh"))
                   )
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program "scp") (tramp-copy-args (("-p" "%k")))
                  (tramp-copy-keep-date t) (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("sshx" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-p" "%p")
                    ("-e" "none" "-t" "-t" "/bin/sh"))
                   )
                  (tramp-async-args (("-q"))) (tramp-remote-sh "/bin/sh")
                  (tramp-copy-program nil) (tramp-copy-args nil)
                  (tramp-copy-keep-date nil) (tramp-password-end-of-line nil)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null")
                    ("-o" "UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("krlogin" (tramp-login-program "krlogin")
                  (tramp-login-args (("%h") ("-l" "%u") ("-x")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line nil))
                 ("plink" (tramp-login-program "plink")
                  (tramp-login-args (("%h") ("-l" "%u") ("-P" "%p") ("-ssh")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line "xy") (tramp-default-port 22))
                 ("plink1" (tramp-login-program "plink")
                  (tramp-login-args
                   (("%h") ("-l" "%u") ("-P" "%p") ("-1" "-ssh")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line "xy") (tramp-default-port 22))
                 ("plinkx" (tramp-login-program "plink")
                  (tramp-login-args
                   (("-load") ("%h") ("-t")
                    ("env 'TERM=dumb' 'PROMPT_COMMAND=' 'PS1=#$ '") ("/bin/sh"))
                   )
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program nil)
                  (tramp-copy-args nil) (tramp-copy-keep-date nil)
                  (tramp-password-end-of-line nil))
                 ("pscp" (tramp-login-program "plink")
                  (tramp-login-args (("%h") ("-l" "%u") ("-P" "%p") ("-ssh")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program "pscp")
                  (tramp-copy-args (("-P" "%p") ("-scp") ("-p" "%k")))
                  (tramp-copy-keep-date t) (tramp-password-end-of-line "xy")
                  (tramp-default-port 22))
                 ("psftp" (tramp-login-program "plink")
                  (tramp-login-args (("%h") ("-l" "%u") ("-P" "%p") ("-ssh")))
                  (tramp-remote-sh "/bin/sh") (tramp-copy-program "pscp")
                  (tramp-copy-args (("-P" "%p") ("-sftp") ("-p" "%k")))
                  (tramp-copy-keep-date t) (tramp-password-end-of-line "xy"))
                 ("fcp" (tramp-login-program "fsh")
                  (tramp-login-args (("%h") ("-l" "%u") ("sh" "-i")))
                  (tramp-remote-sh "/bin/sh -i") (tramp-copy-program "fcp")
                  (tramp-copy-args (("-p" "%k"))) (tramp-copy-keep-date t)
                  (tramp-password-end-of-line nil))
                 )
 tramp-end-of-output "///5df1ef180de2c1d6fb74668eb8fbf490#$"
 tramp-local-coding-commands '((b64 base64-encode-region base64-decode-region)
                               (uu tramp-uuencode-region uudecode-decode-region)
                               (pack
                                "perl -e 'binmode STDIN; binmode STDOUT; print 
pack(q{u*}, join q{}, <>)'" "perl -e 'binmode STDIN; binmode STDOUT; print 
unpack(q{u*}, join q{}, <>)'")
                               )
 tramp-remote-coding-commands '((b64 "base64" "base64 -d")
                                (b64 "mimencode -b" "mimencode -u -b")
                                (b64 "mmencode -b" "mmencode -u -b")
                                (b64 "recode data..base64" "recode 
base64..data")
                                (b64 tramp-perl-encode-with-module
                                 tramp-perl-decode-with-module)
                                (b64 tramp-perl-encode tramp-perl-decode)
                                (uu "uuencode xxx" "uudecode -o /dev/stdout")
                                (uu "uuencode xxx" "uudecode -o -")
                                (uu "uuencode xxx" "uudecode -p")
                                (uu "uuencode xxx" tramp-uudecode)
                                (pack
                                 "perl -e 'binmode STDIN; binmode STDOUT; print 
pack(q{u*}, join q{}, <>)'" "perl -e 'binmode STDIN; binmode STDOUT; print 
unpack(q{u*}, join q{}, <>)'")
                                )
 tramp-actions-before-shell '((tramp-login-prompt-regexp tramp-action-login)
                              (tramp-password-prompt-regexp 
tramp-action-password)
                              (tramp-wrong-passwd-regexp
                               tramp-action-permission-denied)
                              (shell-prompt-pattern tramp-action-succeed)
                              (tramp-shell-prompt-pattern tramp-action-succeed)
                              (tramp-yesno-prompt-regexp tramp-action-yesno)
                              (tramp-yn-prompt-regexp tramp-action-yn)
                              (tramp-terminal-prompt-regexp 
tramp-action-terminal)
                              (tramp-process-alive-regexp
                               tramp-action-process-alive)
                              )
 tramp-actions-copy-out-of-band '((tramp-password-prompt-regexp
                                   tramp-action-password)
                                  (tramp-wrong-passwd-regexp
                                   tramp-action-permission-denied)
                                  (tramp-copy-failed-regexp
                                   tramp-action-permission-denied)
                                  (tramp-process-alive-regexp
                                   tramp-action-out-of-band)
                                  )
 tramp-terminal-type "dumb"
 tramp-shell-prompt-pattern "(base64-decode-string 
\"XCg/Ol5cfA1cKVteIyQlPgpdKiM/WyMkJT5dICpcKBtcW1swLTk7XSpbYS16QS1aXSAqXCkq\""
 tramp-backup-directory-alist nil
 tramp-cache-data '((["sudo" "root" "infaneto" nil]
                     ("uname" "Linux 2.6.27-2-generic") ("test" "test")
                     ("/bin" t) ("/usr/bin" t) ("/usr/sbin" t)
                     ("/usr/local/bin" t) ("/local/bin" nil)
                     ("/local/freeware/bin" nil) ("/local/gnu/bin" nil)
                     ("/usr/freeware/bin" nil) ("/usr/pkg/bin" nil)
                     ("/usr/contrib/bin" nil)
                     ("remote-path"
                      ("/bin" "/usr/bin" "/usr/sbin" "/usr/local/bin"))
                     ("remote-shell" "/bin/sh") ("file-exists" "test -e")
                     ("ls" "/bin/ls") ("stat" "\\stat") ("id" "/usr/bin/id")
                     ("gid-integer" 0) ("perl" "\\perl")
                     ("local-encoding" base64-encode-region)
                     ("local-decoding" base64-decode-region)
                     ("remote-encoding" tramp-perl-encode-with-module)
                     ("remote-decoding" tramp-perl-decode-with-module)
                     ("readlink" "\\readlink") ("uid-integer" 0))
                    (["sudo" "root" "localhost" nil]
                     ("uname" "Linux 2.6.32-22-generic") ("test" "test")
                     ("remote-path"
                      ("/bin" "/usr/bin" "/usr/sbin" "/usr/local/bin"))
                     ("remote-shell" "/bin/sh"))
                    (["dav" "XXX" "XXX" "/"]
                     ("list-mounts"
                      ((19512 36324 793982)
                       (":1.141" "/org/gtk/vfs/mount/1"
                        "WebDAV on XXX"
                        "WebDAV on XXX" ""
                        ". GThemedIcon folder-remote folder" "" t
                        (47 104 111 109 101 47 109 97 103 110 117 115 47 46 103
                         118 102 115 47 87 101 98 68 65 86 32 111 110 32 111 114
                         103 46 120 110 45 45 57 100 98 100 107 119 46 115 101)
                        ((47 111 114 103)
                         (("host"
                           (111 114 103 46 120 110 45 45 57 100 98 100 107 119 
46
                            115 101)
                           )
                          ("ssl" (102 97 108 115 101)) ("type" (100 97 118))
                          ("user" (109 97 103 110 117 115)))
                         )
                        nil)
                       )
                      )
                     ("prefix" ((19512 36324 794708) . "/org"))
                     ("fuse-mountpoint"
                      ((19512 36324 795215) .
                       "/home/magnus/.gvfs/WebDAV on XXX")
                      )
                     ("default-location" ((19512 36324 795688) . "")))
                    )
 shell-prompt-pattern "^[^#$%>\n]*[#$%>] *"
 backup-by-copying nil
 backup-by-copying-when-linked nil
 backup-by-copying-when-mismatch nil
 backup-by-copying-when-privileged-mismatch 200
 password-cache t
 password-cache-expiry nil
 backup-directory-alist nil
 file-name-handler-alist 
'(("\\.Z\\(~\\|\\.~[0-9]+~\\)?\\'\\|\\.bz2\\(~\\|\\.~[0-9]+~\\)?\\'\\|\\.tbz2?\\'\\|\\.\\(?:tgz\\|svgz\\|sifz\\)\\(~\\|\\.~[0-9]+~\\)?\\'\\|\\.g?z\\(~\\|\\.~[0-9]+~\\)?\\'\\|\\.xz\\(~\\|\\.~[0-9]+~\\)?\\'\\|\\.dz\\'"
 . jka-compr-handler)
                           ("\\.gpg\\(~\\|\\.~[0-9]+~\\)?\\'" . 
epa-file-handler)
                           ("\\`/[^/]*\\'" . tramp-completion-file-name-handler)
                           ("\\`/\\([^[/:]+\\|[^/]+]\\):" .
                            tramp-file-name-handler)
                           ("\\`/:" . file-name-non-special))
 )

(setq
 buffer-name "*tramp/dav address@hidden"
 )