Function: eieio-speedbar-find-nearest-object

eieio-speedbar-find-nearest-object is a byte-compiled function defined in eieio-speedbar.el.gz.

Signature

(eieio-speedbar-find-nearest-object &optional DEPTH)

Documentation

Search backwards to the first line associated with an object.

Optional argument DEPTH is the current depth of the search.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/eieio-speedbar.el.gz
(defun eieio-speedbar-find-nearest-object (&optional depth)
  "Search backwards to the first line associated with an object.
Optional argument DEPTH is the current depth of the search."
  (save-excursion
    (if (not depth)
	(progn
	  (beginning-of-line)
	  (when (looking-at "^\\([0-9]+\\):")
	    (setq depth (string-to-number (match-string 1))))))
    (when depth
      (while (and (not (eieio-object-p (speedbar-line-token)))
		  (> depth 0))
	(setq depth (1- depth))
	(re-search-backward (format "^%d:" depth) nil t))
      (speedbar-line-token))))