Mercurial > emacs

diff lisp/net/tramp-smb.el @ 105249:99d98ed749b9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* net/tramp-smb.el (tramp-smb-handle-directory-files-and-attributes): Use `tramp-compat-handle-file-attributes'.
author Michael Albinus <michael.albinus@gmx.de>
date Mon, 28 Sep 2009 11:56:13 +0000
parents 74d482177a44
children 0c6bc9d2b10c
line wrap: on
line diff
--- a/lisp/net/tramp-smb.el	Mon Sep 28 11:54:34 2009 +0000
+++ b/lisp/net/tramp-smb.el	Mon Sep 28 11:56:13 2009 +0000
@@ -323,10 +323,8 @@
   "Like `directory-files-and-attributes' for Tramp files."
   (mapcar
    (lambda (x)
-     ;; We cannot call `file-attributes' for backward compatibility reasons.
-     ;; Its optional parameter ID-FORMAT is introduced with Emacs 22.
-     (cons x (tramp-smb-handle-file-attributes
-	(if full x (expand-file-name x directory)) id-format)))
+     (cons x (tramp-compat-handle-file-attributes
+	      (if full x (expand-file-name x directory)) id-format)))
    (directory-files directory full match nosort)))
 
 (defun tramp-smb-handle-file-attributes (filename &optional id-format)