[elpa] externals/async dbac40131f 2/2: Fix docstring and long lines

[ELPA Syncer]

branch: externals/async
commit dbac40131f6644bf80fd27581b62361e743fb4a8
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Fix docstring and long lines
---
 dired-async.el | 15 +++++++++++----
 1 file changed, 11 insertions(+), 4 deletions(-)

diff --git a/dired-async.el b/dired-async.el
index 47a87212ef..657fa9e6b1 100644
--- a/dired-async.el
+++ b/dired-async.el
@@ -199,7 +199,10 @@ See `file-attributes'."
      (file-attribute-device-number (file-attributes f2))))
 
 (defun dired-async--small-file-p (file)
-  "Return non-nil if FILE is small (can create quickly)."
+  "Return non-nil if FILE is considered small.
+
+File is considered small if it size is smaller than
+`dired-async-small-file-max'."
   (let ((a (file-attributes file)))
     ;; Directories are always large since we can't easily figure out
     ;; their total size.
@@ -216,7 +219,8 @@ See `dired-create-files' for FILE-CREATOR and 
NAME-CONSTRUCTOR."
            (let ((new (funcall name-constructor file)))
              (dired-async--same-device-p file (file-name-directory new))))))
 
-(defun dired-async--smart-create-files (old-func file-creator operation 
fn-list name-constructor
+(defun dired-async--smart-create-files (old-func file-creator
+                                        operation fn-list name-constructor
                                         &optional marker-char)
   "Around advice for `dired-create-files'.
 Uses async like `dired-async-create-files' but skips certain fast
@@ -230,9 +234,12 @@ cases if `dired-async-skip-fast' is non-nil."
             (push old quick-list)
           (push old async-list))))
     (when async-list
-      (dired-async-create-files file-creator operation (nreverse async-list) 
name-constructor marker-char))
+      (dired-async-create-files
+       file-creator operation (nreverse async-list)
+       name-constructor marker-char))
     (when quick-list
-      (funcall old-func file-creator operation (nreverse quick-list) 
name-constructor marker-char))))
+      (funcall old-func file-creator operation
+               (nreverse quick-list) name-constructor marker-char))))
 
 (defvar overwrite-query)
 (defun dired-async-create-files (file-creator operation fn-list 
name-constructor