Function: cperl-imenu-name-and-position

cperl-imenu-name-and-position is a byte-compiled function defined in cperl-mode.el.gz.

Signature

(cperl-imenu-name-and-position)

Documentation

Return the current/previous sexp and its (beginning) location.

Does not move point.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cperl-mode.el.gz
(defun cperl-imenu-name-and-position ()
  "Return the current/previous sexp and its (beginning) location.
Does not move point."
  (save-excursion
    (forward-sexp -1)
    (let ((beg (if imenu-use-markers (point-marker) (point)))
	  (end (progn (forward-sexp) (point))))
      (cons (buffer-substring beg end)
	    beg))))