Don't use (interactive "r")

This caused the fn to fail in a fresh emacs where mark was unset.  Using
region-active-p with region-beginning and region-end seems like the way
to go.