diff options
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/net/tramp-gvfs.el | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1cc71bed1f8..a259288e985 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2012-04-02 Michael Albinus <michael.albinus@gmx.de> + + * net/tramp-gvfs.el (tramp-gvfs-send-command): Apply + `tramp-compat-call-process' instead of `tramp-local-call-process'. + Reported by Magnus Henoch <magnus.henoch@gmail.com>. + 2012-04-01 Chong Yidong <cyd@gnu.org> * files.el (file-in-directory-p): Rename from file-subdir-of-p. diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el index 396443e60e6..6f3c5e04236 100644 --- a/lisp/net/tramp-gvfs.el +++ b/lisp/net/tramp-gvfs.el @@ -1267,7 +1267,7 @@ COMMAND is usually a command from the gvfs-* utilities. (with-current-buffer (tramp-get-buffer vec) (erase-buffer) (tramp-message vec 6 "%s %s" command (mapconcat 'identity args " ")) - (setq result (apply 'tramp-local-call-process command nil t nil args)) + (setq result (apply 'tramp-compat-call-process command nil t nil args)) (tramp-message vec 6 "%s" (buffer-string)) result))) |