help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Help setting nadvice for indent-region


From: Kaushal Modi
Subject: Re: Help setting nadvice for indent-region
Date: Sun, 07 Feb 2016 03:12:53 +0000

On Sat, Feb 6, 2016 at 5:43 AM Michael Heerdegen <michael_heerdegen@web.de>
wrote:

> Just specify an alternative interactive form in adv/indent-region.  I
> would change it into the :around type then, though.
>

Thanks! That worked!

(defun adv/indent-region (orig-fn &rest args)
  (interactive)
  (if mark-active
      (setq args (list (region-beginning) (region-end)))
    (setq args (list (point-min) (point-max))))
  (message "Args: %S" args)
  (apply orig-fn args))
(advice-add 'indent-region :around #'adv/indent-region)


reply via email to

[Prev in Thread] Current Thread [Next in Thread]