[nongnu] elpa/wfnames b050bdabba 57/98: Fix wfnames-revert-changes

[ELPA Syncer]

branch: elpa/wfnames
commit b050bdabba75af50d0f53d4416059b966152c220
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Fix wfnames-revert-changes
---
 wfnames.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/wfnames.el b/wfnames.el
index 341cad909d..be16c97eef 100644
--- a/wfnames.el
+++ b/wfnames.el
@@ -239,8 +239,12 @@ Special commands:
           (unless (string= old new)
             (delete-region (point-at-bol) (point-at-eol))
             (insert (propertize
-                     old 'old-name old 'face 'helm-ff-file)))
-          (forward-line 1))))))
+                     old 'old-name old 'face 'wfnames-file
+                     'line-prefix (propertize
+                                   "* "
+                                   'face 'wfnames-prefix))))
+          (forward-line 1))))
+    (while (re-search-forward "/" (point-at-eol) t))))
 
 (provide 'wfnames)