greg(a)alphatech.com (Greg Klanderman) writes: I don't understand your (> (point) (mark)) check. If I were to change beginning-of-buffer, I'd make a simpler change: (defun ... (interactive "_") (unless (region-active-p) (push-mark)) ;; the rest of the function -- a bit more complex than this, but ;; essentially the same: (goto-char (point-min))) -- Hrvoje Niksic <hniksic(a)srce.hr&gt; | Student at FER Zagreb, Croatia --------------------------------+-------------------------------- What is mind? No matter. What is matter? Never mind.