mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-31 20:02:42 +00:00
Code Issues Releases Activity

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

Browse Source 
but `filename'.
This commit is contained in:
Michael Albinus 2009-06-24 05:12:51 +00:00
parent f084f94244
commit d984860028
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2009-06-24 Michael Albinus <michael.albinus@gmx.de>
* net/tramp-gvfs.el (tramp-gvfs-handle-make-directory): Use `dir'
but `filename'.
2009-06-23 Miles Bader <miles@gnu.org>
* face-remap.el (text-scale-set): New function.

4
lisp/net/tramp-gvfs.el
View File

@ -620,13 +620,13 @@ is no information where to trace the message.")
(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