Re: could mark-paragraph scroll the window?

[Kevin Rodgers]

On 12/29/10 3:03 PM, Eric Abrahamsen wrote:
> Is there any chance that mark-paragraph (which marks consecutive
> paragraphs when used repeatedly) could scroll the window once the
> marking extends below the visible area? I find this command very useful,
> but not being able to see where it's going is very limiting.
>
> Could I make a local version that does what I want?

Perhaps something like this:

(defadvice mark-paragraph (after region-end-visible activate)
  "When called interactively, temporarily display the end of the marked region
if it is not visible in the selected window."
  (when (and (called-interactively-p 'any)
             ;; (eq this-command last-command)
             (not (pos-visible-in-window-p (region-end))))
    (exchange-point-and-mark)
    (sit-for 1)
    (exchange-point-and-mark)))

--
Kevin Rodgers
Denver, Colorado, USA