Re: Let's make C-M-w in isearch yank symbol, not delete character

[Juri Linkov]

> Why only set those properties in the :setter rather tan just do it at
> top-level?  Also, would it be possible to avoid having to list those
> commands and instead treat as `isearch-move` any command which uses the
> handle-shift-selection?

Supporting only commands which use the handle-shift-selection
makes the most sense.  I tested this to confirm it works as expected:

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 84b121a..245bf8a 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2433,8 +2448,8 @@ isearch-pre-command-hook
       (setq this-command 'isearch-edit-string))
      ;; Don't terminate the search for motion commands.
      ((or (and (eq search-exit-option 'move)
-               (symbolp this-command)
-               (eq (get this-command 'isearch-move) t))
+               (stringp (nth 1 (interactive-form this-command)))
+               (string-match-p "^^" (nth 1 (interactive-form this-command))))
           (and (eq search-exit-option 'shift-move)
                this-command-keys-shift-translated))
       (setq this-command-keys-shift-translated nil)