Use use-region-p instead of mark-active