Function: Info-extract-pointer

Info-extract-pointer is a byte-compiled function defined in info.el.gz.

Signature

(Info-extract-pointer NAME &optional ERRORNAME)

Documentation

Extract the value of the node-pointer named NAME.

If there is none, use ERRORNAME in the error message; if ERRORNAME is nil, just return nil.

Source Code

;; Defined in /usr/src/emacs/lisp/info.el.gz
(defun Info-extract-pointer (name &optional errorname)
  "Extract the value of the node-pointer named NAME.
If there is none, use ERRORNAME in the error message;
if ERRORNAME is nil, just return nil."
  ;; Bind this in case the user sets it to nil.
  (let ((case-fold-search t))
    (save-excursion
      (goto-char (point-min))
      (let ((bound (point)))
	(forward-line 1)
	(cond ((re-search-backward
		(concat name ":" (Info-following-node-name-re)) bound t)
	       (match-string-no-properties 1))
	      ((not (eq errorname t))
	       (user-error "Node has no %s"
                           (capitalize (or errorname name)))))))))