Function: comint-search-start

comint-search-start is a byte-compiled function defined in comint.el.gz.

Signature

(comint-search-start ARG)

Documentation

Index to start a directional search, starting at comint-input-ring-index.

Source Code

;; Defined in /usr/src/emacs/lisp/comint.el.gz
(defun comint-search-start (arg)
  "Index to start a directional search, starting at `comint-input-ring-index'."
  (if comint-input-ring-index
      ;; If a search is running, offset by 1 in direction of arg
      (mod (+ comint-input-ring-index (if (> arg 0) 1 -1))
	   (ring-length comint-input-ring))
    ;; For a new search, start from beginning or end, as appropriate
    (if (>= arg 0)
	0				       ; First elt for forward search
      (1- (ring-length comint-input-ring)))))  ; Last elt for backward search