[PATCH 1/1] (tramp-handle-file-readable-p): Don't use file attribute cache when file is a symlink. (tramp-handle-file-writable-p): Likewise.

[Julian Scheid]

---
 lisp/ChangeLog |    6 ++++++
 lisp/tramp.el  |    6 ++++++
 2 files changed, 12 insertions(+), 0 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1f0ad8d..827ff25 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2009-08-15  Julian Scheid  <address@hidden>
+
+       (tramp-handle-file-readable-p): Don't use file attribute cache
+       when file is a symlink.
+       (tramp-handle-file-writable-p): Likewise.
+
 2009-08-15  Michael Albinus  <address@hidden>
 
        * tramp.el (tramp-handle-vc-registered): Embed the code in
diff --git a/lisp/tramp.el b/lisp/tramp.el
index 45cdcae..cdb2b76 100644
--- a/lisp/tramp.el
+++ b/lisp/tramp.el
@@ -2869,6 +2869,9 @@ and gid of the corresponding user is taken.  Both 
parameters must be integers."
                   (and
                    file-attr
                    (or
+                    (eq t (car file-attr))
+                    (null (car file-attr)))
+                   (or
                     ;; World readable.
                     (eq ?r (aref (nth 8 file-attr) 7))
                     ;; User readable and owned by user.
@@ -2991,6 +2994,9 @@ value of `default-file-modes', without execute 
permissions."
                       (and
                        file-attr
                        (or
+                        (eq t (car file-attr))
+                        (null (car file-attr)))
+                       (or
                        ;; World writable.
                         (eq ?w (aref (nth 8 file-attr) 8))
                         ;; User writable and owned by user.
-- 
1.6.4