[nongnu] elpa/helm 27efb97d39 2/3: Improve wdired advice

[ELPA Syncer]

branch: elpa/helm
commit 27efb97d398d077782652f32e0adda6d6fd1f894
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Improve wdired advice
---
 helm-lib.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/helm-lib.el b/helm-lib.el
index f08f34004b..f15cb18b3d 100644
--- a/helm-lib.el
+++ b/helm-lib.el
@@ -265,11 +265,9 @@ available APPEND is ignored."
                          ;; Replace in `dired-directory' files that have
                          ;; been modified with their new name keeping
                          ;; the ones that are unmodified at the same place.
-                         (cl-loop with old-to-rename = (mapcar 'car 
files-renamed)
-                                  for f in (cdr dired-directory)
-                                  if (member f old-to-rename)
-                                  collect (assoc-default f files-renamed)
-                                  else collect f))))
+                         (cl-loop for f in (cdr dired-directory)
+                                  collect (or (assoc-default f files-renamed)
+                                              f)))))
          ;; Re-sort the buffer if all went well.
          (unless (> errors 0) (revert-buffer))
          (let ((inhibit-read-only t))