diff options
| author | Nicolas Petton | 2015-09-30 10:12:26 +0200 |
|---|---|---|
| committer | Nicolas Petton | 2015-09-30 10:13:26 +0200 |
| commit | d1fb5e6c49383c67df136efe2d34a5d3cfed78fd (patch) | |
| tree | 06ce33c081580a6c69e15929591a03fc76a6094e | |
| parent | 25979c8e35e0f4fdb21b873b6976177df0b02e02 (diff) | |
| download | emacs-d1fb5e6c49383c67df136efe2d34a5d3cfed78fd.tar.gz emacs-d1fb5e6c49383c67df136efe2d34a5d3cfed78fd.zip | |
* lisp/arc-mode.el (archive-rar-summarize): Better alignment of the columns.
| -rw-r--r-- | lisp/arc-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el index 7d2cab3edee..cf071e2a1f5 100644 --- a/lisp/arc-mode.el +++ b/lisp/arc-mode.el | |||
| @@ -2064,10 +2064,10 @@ This doesn't recover lost files, it just undoes changes in the buffer itself." | |||
| 2064 | (setq files (nreverse files)) | 2064 | (setq files (nreverse files)) |
| 2065 | (goto-char (point-min)) | 2065 | (goto-char (point-min)) |
| 2066 | (let* ((format (format " %%s %%s %%%ds %%5s %%s" maxsize)) | 2066 | (let* ((format (format " %%s %%s %%%ds %%5s %%s" maxsize)) |
| 2067 | (sep (format format "--------" "-----" (make-string maxsize ?-) | 2067 | (sep (format format "----------" "-----" (make-string maxsize ?-) |
| 2068 | "-----" "")) | 2068 | "-----" "")) |
| 2069 | (column (length sep))) | 2069 | (column (length sep))) |
| 2070 | (insert (format format " Date " "Time " "Size " "Ratio" " Filename") "\n") | 2070 | (insert (format format " Date " "Time " "Size" "Ratio" "Filename") "\n") |
| 2071 | (insert sep (make-string maxname ?-) "\n") | 2071 | (insert sep (make-string maxname ?-) "\n") |
| 2072 | (archive-summarize-files (mapcar (lambda (desc) | 2072 | (archive-summarize-files (mapcar (lambda (desc) |
| 2073 | (let ((text | 2073 | (let ((text |