Fix restoring mark at bob

* helm.el (helm-revive-visible-mark): When marked candidate is the
first it have also the selection overlay.

1 files changed, 2 insertions, 1 deletions

diff --git a/helm.el b/helm.el
index d7716b4d..1e70dbc3 100644
--- a/helm.el
+++ b/helm.el
@@ -5909,7 +5909,8 @@ sources."
           (goto-char (point-min))
           (search-forward o-src-str nil t)
           (while (and (search-forward o-str nil t)
-                      (not (overlays-at (point-at-bol 0)))
+                      (cl-loop for ov in (overlays-at (point-at-bol 0))
+                               never (overlay-get ov 'visible-mark))
                       (helm-current-source-name= o-src-str))
             (setq beg (match-beginning 0)
                   end (match-end 0))