emacs-pretest-bug
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Info-validate bug.


From: Stefan Monnier
Subject: Re: Info-validate bug.
Date: 01 Oct 2003 14:41:03 -0400
User-agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50

> When I do M-x Info-validate in an info buffer, I get:
>   Info-validate: Symbol's function definition is void: 
> Info-following-node-name

> Can somebody confirm that this is the right fix?

No, it's not :-(
Can you try the fix below instead ?
The problem was introduced by the following change:

2003-07-04  Stefan Monnier  <address@hidden>

        * info.el (Info-following-node-name-re): New fun.
        (Info-following-node-name): Remove.
        (Info-insert-dir): Use the new fun.
        (Info-extract-pointer): Don't save restriction; use new fun.
        (Info-menu-entry-name-re): New const.
        (Info-menu-entry-name-re): Use it along with new fun.
        (Info-node-spec-re): Use new fun.
        (Info-complete-menu-item, Info-fontify-node): Use new const.
        (Info-goto-node, Info-follow-reference, Info-menu-update):
        Use match-string.
        (Info-follow-reference): Use assoc-string.
        Use a list of strings for the completion table.
        (Info-fontify-node): Use match-string, line-end-position.
        Limit the search for `node:' to the first line.


-- Stefan


--- informat.el.~1.21.~ 2003-09-08 19:10:03.000000000 -0400
+++ informat.el 2003-10-01 14:36:42.000000000 -0400
@@ -1,6 +1,6 @@
 ;;; informat.el --- info support functions package for Emacs
 
-;; Copyright (C) 1986 Free Software Foundation, Inc.
+;; Copyright (C) 1986, 2003 Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Keywords: help
@@ -266,7 +266,8 @@
                                             (progn
                                               (goto-char (match-end 0))
                                               (downcase
-                                               (Info-following-node-name)))))
+                                               (and (looking-at 
(Info-following-node-name-re))
+                                                    (match-string 1))))))
                                      beg)
                                Info-validate-allnodes)))))))
        (goto-char (point-min))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]