Re: Use tab key to indent both region AND line?

[mopi]

On Apr 20, 7:16 pm, "Lennart Borgman (gmail)"
<lennart.borg...@gmail.com> wrote:
> And here is something that can be used:
>
> ;; From an idea by weber <hug...@gmail.com>
> (defun indent-line-or-region ()
>    "indent line or region"
>    (interactive)
>    (if mark-active ;; there is a region selected
>        (indent-region (region-beginning) (region-end))
>      (indent-according-to-mode))) ;; indent line
>
> (define-minor-mode indent-line-mode
>    "Use TAB to indent line and region."
>    :global t
>    :keymap '(([tab] . indent-line-or-region)))
> (when indent-line-mode (indent-line-mode 1))


Thank you very much!
I changed it slightly to use indent-rigidly:

(defun indent-line-or-region ()
   "indent line or region"
   (interactive)
   (if mark-active ;; there is a region selected
       (indent-rigidly (region-beginning) (region-end) 4)
     (indent-according-to-mode))) ;; indent line

Is there a way to make it keep the region? Now after I press tab the
region is lost so I can't repeat the indentation without reselecting
the region.