(if (not (region-exists-p)) (mark-whole-buffer))