Support other search tools, like `swiper-isearch-thing-at-point` about symbol-overlay HOT 3 CLOSED

(defvar my-symbol-overlay-map
  (let ((map (make-sparse-keymap)))
    (define-key map (kbd "i") 'symbol-overlay-put)
    (define-key map (kbd "h") 'symbol-overlay-map-help)
    (define-key map (kbd "p") 'symbol-overlay-jump-prev)
    (define-key map (kbd "n") 'symbol-overlay-jump-next)
    (define-key map (kbd "<") 'symbol-overlay-jump-first)
    (define-key map (kbd ">") 'symbol-overlay-jump-last)
    (define-key map (kbd "w") 'symbol-overlay-save-symbol)
    (define-key map (kbd "t") 'symbol-overlay-toggle-in-scope)
    (define-key map (kbd "e") 'symbol-overlay-echo-mark)
    (define-key map (kbd "d") 'symbol-overlay-jump-to-definition)
    (define-key map (kbd "s") 'swiper-isearch-thing-at-point) ; THIS IS THE ONLY CUSTOMIZATION FOR NOW
    (define-key map (kbd "q") 'symbol-overlay-query-replace)
    (define-key map (kbd "r") 'symbol-overlay-rename)
    map)
  "Keymap automatically activated inside overlays.
You can re-bind the commands to any keys you prefer.")

(setq symbol-overlay-map my-symbol-overlay-map)

;; Override to not insert boundaries; should request it be a customize-ation
(defun ivy--insert-symbol-boundaries ()
  (undo-boundary)
  ;; next two surely not needed
  (beginning-of-line)
  (end-of-line))

(with-eval-after-load 'symbol-overlay
  (define-key symbol-overlay-map (kbd "s") 'swiper-isearch-thing-at-point))