diff options
| author | Sebastian Reuße | 2017-12-30 12:41:23 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2017-12-30 12:41:23 +0200 |
| commit | fb20043b2fec8e8aff6354ec1396fd5ba688b76b (patch) | |
| tree | 41591fc1355ed638f07fd0e83ffdce6b1e0b4959 | |
| parent | ace8f2ed4d6ea49d179333f8e7455e5208417da7 (diff) | |
| download | emacs-fb20043b2fec8e8aff6354ec1396fd5ba688b76b.tar.gz emacs-fb20043b2fec8e8aff6354ec1396fd5ba688b76b.zip | |
Fix output alignment in 'find-dired' for "ls -h"
* lisp/find-dired.el (find-dired-filter): Fix alignment of
the file size column when the -h ls option is used in
'find-ls-option'. (Bug#29803)
Copyright-paperwork-exempt: yes
| -rw-r--r-- | lisp/find-dired.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/find-dired.el b/lisp/find-dired.el index 3b0613b2806..bf815d500d0 100644 --- a/lisp/find-dired.el +++ b/lisp/find-dired.el | |||
| @@ -295,7 +295,7 @@ specifies what to use in place of \"-ls\" as the final argument." | |||
| 295 | (l-opt (and (consp find-ls-option) | 295 | (l-opt (and (consp find-ls-option) |
| 296 | (string-match "l" (cdr find-ls-option)))) | 296 | (string-match "l" (cdr find-ls-option)))) |
| 297 | (ls-regexp (concat "^ +[^ \t\r\n]+\\( +[^ \t\r\n]+\\) +" | 297 | (ls-regexp (concat "^ +[^ \t\r\n]+\\( +[^ \t\r\n]+\\) +" |
| 298 | "[^ \t\r\n]+ +[^ \t\r\n]+\\( +[0-9]+\\)"))) | 298 | "[^ \t\r\n]+ +[^ \t\r\n]+\\( +[^[:space:]]+\\)"))) |
| 299 | (goto-char beg) | 299 | (goto-char beg) |
| 300 | (insert string) | 300 | (insert string) |
| 301 | (goto-char beg) | 301 | (goto-char beg) |