Fold the active region in Emacs