Re: sftp access method fails on Emacs master

[Michael Albinus]

Stephen Berman <address@hidden> writes:

Hi Steve,

>> It's late in the night, so just a first check only. Does the following
>> patch helps?
>
> Building with this patch raises the error 'Invalid read syntax: ")"'.
> I assume you meant to add only two instead of five parens after #07777
> (it was after all late at night ;-).  With that change the build
> succeeds but sftp access fails the same as before.

Indeed. I *knew* I shouldn't send w/o further checks ...

Attached is another patch, to be applied instead. Could you pls check
whether the problem is solved then? If not, I would need Tramp traces
with verbosity 10, again.

> Steve Berman

*** /tmp/ediff5ozdac    2019-04-07 11:31:24.173760761 +0200
--- /home/albinus/src/tramp/lisp/tramp-gvfs.el  2019-04-07 11:30:43.940638314 
+0200
***************
*** 1136,1142 ****
    "Like `file-executable-p' for Tramp files."
    (with-parsed-tramp-file-name filename nil
      (with-tramp-file-property v localname "file-executable-p"
!       (tramp-check-cached-permissions v ?x))))

  (defun tramp-gvfs-handle-file-name-all-completions (filename directory)
    "Like `file-name-all-completions' for Tramp files."
--- 1136,1143 ----
    "Like `file-executable-p' for Tramp files."
    (with-parsed-tramp-file-name filename nil
      (with-tramp-file-property v localname "file-executable-p"
!       (and (file-exists-p filename)
!          (tramp-check-cached-permissions v ?x)))))

  (defun tramp-gvfs-handle-file-name-all-completions (filename directory)
    "Like `file-name-all-completions' for Tramp files."
***************
*** 1258,1264 ****
    "Like `file-readable-p' for Tramp files."
    (with-parsed-tramp-file-name filename nil
      (with-tramp-file-property v localname "file-readable-p"
!       (tramp-check-cached-permissions v ?r))))

  (defun tramp-gvfs-handle-file-system-info (filename)
    "Like `file-system-info' for Tramp files."
--- 1259,1266 ----
    "Like `file-readable-p' for Tramp files."
    (with-parsed-tramp-file-name filename nil
      (with-tramp-file-property v localname "file-readable-p"
!       (and (file-exists-p filename)
!          (tramp-check-cached-permissions v ?r)))))

  (defun tramp-gvfs-handle-file-system-info (filename)
    "Like `file-system-info' for Tramp files."