Function: vc-bzr-shelve-get-at-point

vc-bzr-shelve-get-at-point is a byte-compiled function defined in vc-bzr.el.gz.

Signature

(vc-bzr-shelve-get-at-point POINT)

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc-bzr.el.gz
(defun vc-bzr-shelve-get-at-point (point)
  (save-excursion
    (goto-char point)
    (beginning-of-line)
    (if (looking-at "^ +\\([0-9]+\\):")
	(match-string 1)
      (error "Cannot find shelf at point"))))