Re: could mark-paragraph scroll the window?

[Kevin Rodgers]

On 1/4/11 6:35 AM, Deniz Dogan wrote:
> 2011/1/4 Kevin Rodgers<kevin.d.rodgers@gmail.com>:
> > 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)))
>
> This code works very strangely when I try it.

Glad to hear that it works.  :-)

--
Kevin Rodgers
Denver, Colorado, USA