beginning-of-buffer sets the mark, this is super annoying. Changed to (goto-char 0)