Re: isearch-whole-buffer?

[Johan Bockgård]

In Emacs 22 you could use something like:

(setq isearch-search-fun-function 'wrapping-search-fun)

(defun wrapping-search-fun ()
  (lambda (&rest args)
    (let* ((isearch-search-fun-function nil)
           (fun (isearch-search-fun)))
      (or (apply fun args)
          (unless (cadr args)
            (goto-char (if isearch-forward (point-min) (point-max)))
            (apply fun args))))))


(It will wrap around silently without indicating "wrapped" or
"overwrapped" search.)

-- 
Johan Bockgård