[Emacs-diffs] emacs/lisp/net tramp-gvfs.el

[Michael Albinus]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Michael Albinus <albinus>       09/06/24 05:10:57

Modified files:
        lisp/net       : tramp-gvfs.el 

Log message:
        * net/tramp-gvfs.el (tramp-gvfs-handle-make-directory): Use `dir'
        but `filename'.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/net/tramp-gvfs.el?cvsroot=emacs&r1=1.3&r2=1.4

Patches:
Index: tramp-gvfs.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/tramp-gvfs.el,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- tramp-gvfs.el       23 Jun 2009 07:44:08 -0000      1.3
+++ tramp-gvfs.el       24 Jun 2009 05:10:57 -0000      1.4
@@ -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