Re: Simple isearch concerns

[Juri Linkov]

> Sorry, there was a typo in the previous patch, I attach a corrected one.

Thanks, please see the comments below:

> +(put 'beginning-of-buffer 'isearch-match-scroll t)
> +(put 'end-of-buffer 'isearch-match-scroll t)
> +(put 'scroll-up-command 'isearch-match-scroll t)
> +(put 'scroll-down-command 'isearch-match-scroll t)
> +
> +(put 'beginning-of-buffer 'isearch-match-scroll-command 
> 'isearch-beginning-of-buffer)
> +(put 'end-of-buffer 'isearch-match-scroll-command 'isearch-end-of-buffer)
> +(put 'scroll-up-command 'isearch-match-scroll-command 'isearch-scroll-up)
> +(put 'scroll-down-command 'isearch-match-scroll-command 'isearch-scroll-down)

Why such unnecessary duplication?  When 'beginning-of-buffer' has the
property 'isearch-match-scroll-command' this means it has a non-nil value.
There is no need to duplicate this fact with isearch-match-scroll=t.

> +  :type '(choice (const :tag "Off" nil)
> +                 (const tag "On" t))
                           ===
                           :tag