add compat function region-active-p