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

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

Re: Elisp Manual: New Symbols node


From: Nick Roberts
Subject: Re: Elisp Manual: New Symbols node
Date: Fri, 30 Jun 2006 12:35:21 +1200

Nick Roberts writes:
 >  >    Assuming that I've built the manual properly, why can't they work like
 >  >    the previous Index (generated by findex, vindex etc?)  and send the 
 > user
 >  >    directly to the relevant line?
 >  > 
 >  > They still do for me.
 > 
 > Yes.  Forget it, there's something wrong with my setup.
 > 
 > Sorry for the noise.

Actually (changing my mind again!) there is a bug which I've now tracked down:

Info-find-node-2 in info.el has:

  (if (and (re-search-forward
            "makeinfo version \\([0-9]+.[0-9]+\\)"
            (line-beginning-position 3) t)

This works if the start of the info file looks like:

  This is /home/nickrob/emacs1/lispref/../info/elisp, produced by
  makeinfo version 4.8 from /home/nickrob/emacs1/lispref/elisp.texi.

but not if it looks like:

  This is /home/nickrob/emacs/lispref/../info/elisp, produced by makeinfo
  version 4.8 from /home/nickrob/emacs/lispref/elisp.texi.

because "makeinfo version" has been split by a newline.

I've fixed this, for now, with the patch below.

Another bug (which I've not fixed) is that the links in the indices are
no longer underlined.  Maybe that's a deliberate attempt to prevent visual
overload, but it's not immediately clear that they _are_ links, so I think
it should be fixed, in any case.


-- 
Nick                                           http://www.inet.net.nz/~nickrob


*** info.el     30 Jun 2006 12:27:18 +1200      1.486
--- info.el     30 Jun 2006 12:27:49 +1200      
*************** a case-insensitive match is tried."
*** 844,850 ****
                (goto-char (point-min))
                (condition-case ()
                    (if (and (re-search-forward
!                             "makeinfo version \\([0-9]+.[0-9]+\\)"
                              (line-beginning-position 3) t)
                             (not (version< (match-string 1) "4.7")))
                        (setq found t))
--- 844,850 ----
                (goto-char (point-min))
                (condition-case ()
                    (if (and (re-search-forward
!                             "makeinfo[ \n]version[ \n]\\([0-9]+.[0-9]+\\)"
                              (line-beginning-position 3) t)
                             (not (version< (match-string 1) "4.7")))
                        (setq found t))




reply via email to

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