# HG changeset patch
# User Michael Albinus <michael.albinus@gmx.de>
# Date 1245820257 0
# Node ID 73a0bf7489f59d61d2d35c25ee7835daf3fde973
# Parent  05f6166586683a12f8f3e1ed19fac89199a468dc
* net/tramp-gvfs.el (tramp-gvfs-handle-make-directory): Use `dir'
but `filename'.

diff -r 05f616658668 -r 73a0bf7489f5 lisp/net/tramp-gvfs.el
--- a/lisp/net/tramp-gvfs.el	Wed Jun 24 04:24:18 2009 +0000
+++ b/lisp/net/tramp-gvfs.el	Wed Jun 24 05:10:57 2009 +0000
@@ -620,13 +620,13 @@
 	(tramp-gvfs-fuse-file-name dir) parents)
     ;; Error case.  Let's try it with the GVFS utilities.
     (error
-     (with-parsed-tramp-file-name filename nil
+     (with-parsed-tramp-file-name dir nil
        (tramp-message v 4 "`make-directory' failed, trying `gvfs-mkdir'")
        (unless
 	   (zerop
 	    (tramp-local-call-process
 	     "gvfs-mkdir" nil (tramp-get-buffer v) nil
-	     (tramp-gvfs-url-file-name filename)))
+	     (tramp-gvfs-url-file-name dir)))
 	 (signal (car err) (cdr err)))))))
 
 (defun tramp-gvfs-handle-rename-file