🚀 go-pugleaf

Relay-Version: VMS News - V5.9C 19/12/89 VAX/VMS V5.3; site vax1.cc.lehigh.edu
Path: vax1.cc.lehigh.edu!vax1.cc.lehigh.edu!netnews.upenn.edu!rutgers!tut.cis.ohio-state.edu!FUTURE.GIPSI.FR!bruno
Newsgroups: gnu.emacs.bug
Subject: small bug in info.el
Message-ID: <9010230916.AA05429@future.gipsi.fr>
From: bruno@FUTURE.GIPSI.FR (Bruno Verlyck)
Date: 23 Oct 90 09:16:18 GMT
Reply-To: bruno@gipsi.gipsi.fr
Sender: daemon@tut.cis.ohio-state.edu
Distribution: gnu
Organization: GNUs Not Usenet
Approved: bug-gnu-emacs@prep.ai.mit.edu
Lines: 68

I have a colleague who has
	(setq default-case-fold-search nil)
in his .emacs (don't ask me why :-).

When he tried to read the gas info node, he got an error
	No such node: Top

This is because gas.texinfo specifies a `top' node, instead of a `Top'
one, and case-fold-search is not set to t in the " *info tag table*"
buffer, as it is in *info* by info-mode.

It might be argued that this is a bug in gas.texinfo.  In fact,
makeinfo gives this bunch of errors when applied to it:
gas.texinfo:41: `top' has an Up field of `top', but `top' has no menu item for `top'.
gas.texinfo:905: Node `LdSegs' is missing an "Up" field.
gas.texinfo:959: Node `MythSegs' is missing an "Up" field.
gas.texinfo:1081: `Labels' has an Up field of `Symbols', but `Symbols' has no menu item for `Labels'.
gas.texinfo:1244: `Primary' has an Up field of `Expressions', but `Expressions' has no menu item for `Primary'.
gas.texinfo:1244: `Unops' has an Up field of `Expressions', but `Expressions' has no menu item for `Unops'.
gas.texinfo:1363: `Abort' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Abort'.
gas.texinfo:1363: `Align' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Align'.
gas.texinfo:1363: `Ascii' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Ascii'.
gas.texinfo:1363: `Asciz' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Asciz'.
gas.texinfo:1363: `Byte' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Byte'.
gas.texinfo:1363: `Comm' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Comm'.
gas.texinfo:1363: `Data' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Data'.
gas.texinfo:1363: `Desc' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Desc'.
gas.texinfo:1363: `Double' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Double'.
gas.texinfo:1363: `File' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `File'.
gas.texinfo:1363: `Fill' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Fill'.
gas.texinfo:1363: `Float' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Float'.
gas.texinfo:1363: `Gdbbeg' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Gdbbeg'.
gas.texinfo:1363: `Gdbblock' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Gdbblock'.
gas.texinfo:1363: `Gdbend' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Gdbend'.
gas.texinfo:1363: `Gdbsym' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Gdbsym'.
gas.texinfo:1363: `Global' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Global'.
gas.texinfo:1363: `Int' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Int'.
gas.texinfo:1363: `Lcomm' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Lcomm'.
gas.texinfo:1363: `Line' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Line'.
gas.texinfo:1363: `Long' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Long'.
gas.texinfo:1363: `Lsym' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Lsym'.
gas.texinfo:1363: `Octa' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Octa'.
gas.texinfo:1363: `Org' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Org'.
gas.texinfo:1363: `Quad' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Quad'.
gas.texinfo:1363: `Set' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Set'.
gas.texinfo:1363: `Short' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Short'.
gas.texinfo:1363: `Space' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Space'.
gas.texinfo:1363: `Stab' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Stab'.
gas.texinfo:1363: `Text' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Text'.
gas.texinfo:1363: `Word' has an Up field of `PseudoOps', but `PseudoOps' has no menu item for `Word'.

In any case, it is easy to protect emacs against this sort of
not-already-cleaned texinfo file (and luser :-).  Here's my patch:

*** info.el-ori	Fri Sep  1 17:04:05 1989
--- info.el	Fri Oct 19 12:19:51 1990
***************
*** 119,124 ****
--- 119,125 ----
  			  (let ((buf (current-buffer)))
  			    (set-buffer (get-buffer-create " *info tag table*"))
  			    (erase-buffer)
+ 			    (setq case-fold-search t)
  			    (insert-buffer-substring buf)
  			    (set-marker Info-tag-table-marker
  					(match-end 0))))

Bruno.