comparison lisp/info.el @ 440:8de8e3f6228a r21-2-28

Import from CVS: tag r21-2-28
author cvs
date Mon, 13 Aug 2007 11:33:38 +0200
parents 84b14dcb0985
children abe6d1db359e
comparison
equal deleted inserted replaced
439:357dd071b03c 440:8de8e3f6228a
1682 nil 1682 nil
1683 (error (concat "Node has no " (capitalize (or errorname name))))))))) 1683 (error (concat "Node has no " (capitalize (or errorname name)))))))))
1684 1684
1685 ;; Return the node name in the buffer following point. 1685 ;; Return the node name in the buffer following point.
1686 ;; ALLOWEDCHARS, if non-nil, goes within [...] to make a regexp 1686 ;; ALLOWEDCHARS, if non-nil, goes within [...] to make a regexp
1687 ;; saying which chas may appear in the node name. 1687 ;; saying which chars may appear in the node name.
1688 (defun Info-following-node-name (&optional allowedchars) 1688 (defun Info-following-node-name (&optional allowedchars)
1689 (skip-chars-forward " \t") 1689 (skip-chars-forward " \t")
1690 (buffer-substring 1690 (buffer-substring
1691 (point) 1691 (point)
1692 (progn 1692 (progn