diff options
| author | Roland Winkler | 2019-06-11 22:17:30 -0500 |
|---|---|---|
| committer | Roland Winkler | 2019-06-11 22:17:30 -0500 |
| commit | b8350e52ef6201103b12db5ad8b9268452feb8b6 (patch) | |
| tree | 81c89dd9d26be94c135c8a031d430a19f20f1cde | |
| parent | 249902d5ad5d3ae3e25323c23a2f442913729ceb (diff) | |
| download | emacs-b8350e52ef6201103b12db5ad8b9268452feb8b6.tar.gz emacs-b8350e52ef6201103b12db5ad8b9268452feb8b6.zip | |
Fix to previous commit
* find-dired.el (find-dired-sentinel): Check whether
find-dired-refine-function is non-nil.
| -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 6e5abe2f134..2c76179da06 100644 --- a/lisp/find-dired.el +++ b/lisp/find-dired.el | |||
| @@ -350,7 +350,7 @@ specifies what to use in place of \"-ls\" as the final argument." | |||
| 350 | (save-excursion | 350 | (save-excursion |
| 351 | (save-restriction | 351 | (save-restriction |
| 352 | (widen) | 352 | (widen) |
| 353 | (when (boundp 'find-dired-refine-function) | 353 | (when find-dired-refine-function |
| 354 | ;; `find-dired-filter' puts two whitespace characters | 354 | ;; `find-dired-filter' puts two whitespace characters |
| 355 | ;; at the beginning of every line. | 355 | ;; at the beginning of every line. |
| 356 | (narrow-to-region (point) (- (point-max) 2)) | 356 | (narrow-to-region (point) (- (point-max) 2)) |