Function: edt-find-next-forward

edt-find-next-forward is an interactive and byte-compiled function defined in edt.el.gz.

Signature

(edt-find-next-forward)

Documentation

Find next occurrence of a string in forward direction.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/edt.el.gz
;;;
;;; FNDNXT
;;;

(defun edt-find-next-forward ()
  "Find next occurrence of a string in forward direction."
  (interactive)
  (edt-with-position
   (forward-char 1)
   (if (search-forward edt-find-last-text nil t)
       (progn
         (search-backward edt-find-last-text)
         (edt-set-match)
         (if (> (point) far)
             (let ((left (save-excursion (forward-line height))))
               (recenter (if (zerop left) top-margin
                           (- left bottom-up-margin))))
           (and (> (point) bottom) (recenter bottom-margin))))
     (backward-char 1)
     (error "Search failed: \"%s\"" edt-find-last-text))))