mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Avoid recursive detection of remote uid and gid in tramp-gvfs.el

Browse source 
* lisp/net/tramp-gvfs.el (tramp-gvfs-get-remote-uid-gid-in-progress):
New variable.
(tramp-gvfs-maybe-open-connection): Use it.

* test/lisp/net/tramp-tests.el (tramp-test18-file-attributes):
Reorder test.
This commit is contained in:
Michael Albinus 2016-07-09 14:20:07 +02:00
parent e4adb6cdf3
commit bfc29a5bce
2 changed files with 12 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

6
test/lisp/net/tramp-tests.el
View file

@ -1113,12 +1113,12 @@ This tests also `file-readable-p' and `file-regular-p'."
(progn
(write-region "foo" nil tmp-name1)
(should (file-exists-p tmp-name1))
(setq attr (file-attributes tmp-name1))
(should (consp attr))
(should (file-exists-p tmp-name1))
(should (file-readable-p tmp-name1))
(should (file-regular-p tmp-name1))
;; We do not test inodes and device numbers.
(setq attr (file-attributes tmp-name1))
(should (consp attr))
(should (null (car attr)))
(should (numberp (nth 1 attr))) ;; Link.
(should (numberp (nth 2 attr))) ;; Uid.