Bill Burdick <bill.burd...@gmail.com> writes:

> Sure:
>
> (defun bill/restore-calc-point (result)
>   (when bill/calc-point
>     (goto-char bill/calc-point)
>     (setq bill/calc-point nil))
>   result)
>
> (advice-add 'hmouse-function :filter-return 'bill/restore-calc-point)
>
> If my recalc function matches, it sets bill/restore-calc-point to a marker 
> like this:
>
> (setq bill/calc-point (make-marker))
>
> Since it's normally nil, the advice normally just ignores it.

Thanks.  I wanted to learn more about advising functions.

-- 
David Masterson

Reply via email to