diff --git a/lispintro/emacs-lisp-intro.texi b/lispintro/emacs-lisp-intro.texi
index ea611b49f98df4f9d5f78a9ae73dcfd6004f3fc2..f3327e46b6a2a2f98ae3c9a9bda8b79929d70e40 100644
--- a/lispintro/emacs-lisp-intro.texi
+++ b/lispintro/emacs-lisp-intro.texi
@@ -219,16 +219,11 @@ plus 1pt
 
 @c ----------------------------------------------------
 
-@ignore
-@ifinfo
-@format
-START-INFO-DIR-ENTRY
-* Emacs Lisp Intro: (emacs-lisp-intro).
+@dircategory Emacs
+@direntry
+* Emacs Lisp Intro: (eintr).
   			A simple introduction to Emacs Lisp programming.
-END-INFO-DIR-ENTRY
-@end format
-@end ifinfo
-@end ignore
+@end direntry
 
 @ifinfo
 This is an introduction to @cite{Programming in Emacs Lisp}, for
@@ -21405,9 +21400,9 @@ as a draft) by the Free Software Foundation.
 @comment  node-name,  next,  previous,  up
 @unnumbered Index
 
-@ifnottex
+@ignore
 MENU ENTRY: NODE NAME.
-@end ifnottex
+@end ignore
 
 @printindex cp