[Emacs-diffs] Changes to emacs/lisp/net/tramp-smb.el

[Juanma Barranquero]

Index: emacs/lisp/net/tramp-smb.el
diff -c emacs/lisp/net/tramp-smb.el:1.1 emacs/lisp/net/tramp-smb.el:1.2
*** emacs/lisp/net/tramp-smb.el:1.1     Thu Dec 26 15:47:51 2002
--- emacs/lisp/net/tramp-smb.el Tue Feb  4 08:17:16 2003
***************
*** 328,334 ****
       (cons x (file-attributes
        (if full x (concat (file-name-as-directory directory) x)))))
     (directory-files directory full match nosort)))
!  
  (defun tramp-smb-handle-file-attributes (filename &optional nonnumeric)
    "Like `file-attributes' for tramp files.
  Optional argument NONNUMERIC means return user and group name
--- 328,334 ----
       (cons x (file-attributes
        (if full x (concat (file-name-as-directory directory) x)))))
     (directory-files directory full match nosort)))
! 
  (defun tramp-smb-handle-file-attributes (filename &optional nonnumeric)
    "Like `file-attributes' for tramp files.
  Optional argument NONNUMERIC means return user and group name
***************
*** 477,483 ****
             (entries (tramp-smb-get-file-entries user host share file)))
  
        ;; Delete dummy "" entry, useless entries
!       (setq entries 
              (if (file-directory-p filename)
                  (delq (assoc "" entries) entries)
                ;; We just need the only and only entry FILENAME.
--- 477,483 ----
             (entries (tramp-smb-get-file-entries user host share file)))
  
        ;; Delete dummy "" entry, useless entries
!       (setq entries
              (if (file-directory-p filename)
                  (delq (assoc "" entries) entries)
                ;; We just need the only and only entry FILENAME.