comparison lisp/info.el @ 49465:e97c1fa39f09

(Info-extract-menu-node-name): Fix 2003-01-24 change. Don't search for next colon if current colon is followed by one of ".", ",", ";", or ")".

49464:d7547cf75d28

(defun Info-extract-menu-node-name (&optional errmessage multi-line)
  (skip-chars-forward " \t\n")
  (let ((beg (point))
	str i)
    (while (not (looking-at ":*[ \n]"))
      (skip-chars-forward "^:")
      (forward-char 1))
    (setq str
	  (if (looking-at ":")
	      (buffer-substring-no-properties beg (1- (point)))

49465:e97c1fa39f09

(defun Info-extract-menu-node-name (&optional errmessage multi-line)
  (skip-chars-forward " \t\n")
  (let ((beg (point))
	str i)
    (while (not (looking-at ":*[,.;) \n]"))
      (skip-chars-forward "^:")
      (forward-char 1))
    (setq str
	  (if (looking-at ":")
	      (buffer-substring-no-properties beg (1- (point)))