diff options
| author | Michael Albinus | 2017-10-16 11:35:02 +0200 |
|---|---|---|
| committer | Michael Albinus | 2017-10-16 11:35:02 +0200 |
| commit | 16e85456e70174f1d97fc5a7cd8a199b8f0e7e70 (patch) | |
| tree | d5451050c6e5f7f96b201a6290439fa06aa5aa49 | |
| parent | 613db8d35c3d080fd059dfc8cf668520bf6950d2 (diff) | |
| download | emacs-16e85456e70174f1d97fc5a7cd8a199b8f0e7e70.tar.gz emacs-16e85456e70174f1d97fc5a7cd8a199b8f0e7e70.zip | |
Fix error in tramp-smb-handle-insert-directory
* lisp/net/tramp-smb.el (tramp-smb-handle-insert-directory):
Insert size information only when FULL-DIRECTORY-P is non-nil.
| -rw-r--r-- | lisp/net/tramp-smb.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el index 620c93828da..f35c10b58ab 100644 --- a/lisp/net/tramp-smb.el +++ b/lisp/net/tramp-smb.el | |||
| @@ -1073,10 +1073,11 @@ PRESERVE-UID-GID and PRESERVE-EXTENDED-ATTRIBUTES are completely ignored." | |||
| 1073 | entries)) | 1073 | entries)) |
| 1074 | 1074 | ||
| 1075 | ;; Insert size information. | 1075 | ;; Insert size information. |
| 1076 | (insert | 1076 | (when full-directory-p |
| 1077 | (if avail | 1077 | (insert |
| 1078 | (format "total used in directory %s available %s\n" used avail) | 1078 | (if avail |
| 1079 | (format "total %s\n" used))) | 1079 | (format "total used in directory %s available %s\n" used avail) |
| 1080 | (format "total %s\n" used)))) | ||
| 1080 | 1081 | ||
| 1081 | ;; Print entries. | 1082 | ;; Print entries. |
| 1082 | (mapc | 1083 | (mapc |