 ;;; point at the beginning.
 ;; http://www.emacswiki.org/emacs/ZapToISearch
 (defun isearch-exit-other-end (rbeg rend)
-  "Exit isearch, but at the other end of the search string.
+  "Exit isearch, but at the other end of the search string (RBEG REND).
 This is useful when followed by an immediate kill."
   (interactive "r")
   (isearch-exit)


;;; Force a vertical window split.
(defadvice smart-compile (around split-horizontally activate)
  (let ((split-width-threshold nil)
        (split-height-threshold 0))
    ad-do-it))

    ))

(defun next-user-buffer ()
  "Switch to the next user buffer in cyclic order.
User buffers are those not starting with *."
  (interactive)
  (next-buffer)
