Correct page IDs in Chapter 08 dejagnu, expect, and tcl.

4 files changed, 23 insertions, 13 deletions

diff --git a/chapter01/changelog.xml b/chapter01/changelog.xml
index c4fd38872..c340b26be 100644
--- a/chapter01/changelog.xml
+++ b/chapter01/changelog.xml
@@ -43,6 +43,16 @@
     appropriate for the entry or if needed the entire day's listitem.
     -->
     <listitem>
+      <para>2021-07-22</para>
+      <itemizedlist>
+        <listitem>
+          <para>[dj] - Correct page IDs in Chapter 08 dejagnu, expect, and
+          tcl.</para>
+        </listitem>
+      </itemizedlist>
+    </listitem>
+
+    <listitem>
       <para>2021-07-20</para>
       <itemizedlist>
         <listitem>
diff --git a/chapter08/dejagnu.xml b/chapter08/dejagnu.xml
index 169ad4b50..23c1734b8 100644
--- a/chapter08/dejagnu.xml
+++ b/chapter08/dejagnu.xml
@@ -5,7 +5,7 @@
   %general-entities;
 ]>
 
-<sect1 id="ch-tools-dejagnu" role="wrap">
+<sect1 id="ch-system-dejagnu" role="wrap">
   <?dbhtml filename="dejagnu.html"?>
 
   <sect1info condition="script">
@@ -16,7 +16,7 @@
 
   <title>DejaGNU-&dejagnu-version;</title>
 
-  <indexterm zone="ch-tools-dejagnu">
+  <indexterm zone="ch-system-dejagnu">
     <primary sortas="a-DejaGNU">DejaGNU</primary>
   </indexterm>
 
@@ -88,7 +88,7 @@ install -v -m644   doc/dejagnu.{html,txt} /usr/share/doc/dejagnu-&dejagnu-versio
         <listitem>
           <para>A wrapper script that locates the proper
           <command>expect</command> shell and then runs DejaGNU</para>
-          <indexterm zone="ch-tools-dejagnu runtest">
+          <indexterm zone="ch-system-dejagnu runtest">
             <primary sortas="b-runtest">runtest</primary>
           </indexterm>
         </listitem>
diff --git a/chapter08/expect.xml b/chapter08/expect.xml
index da374bd9d..1e56595fb 100644
--- a/chapter08/expect.xml
+++ b/chapter08/expect.xml
@@ -5,7 +5,7 @@
   %general-entities;
 ]>
 
-<sect1 id="ch-tools-expect" role="wrap">
+<sect1 id="ch-system-expect" role="wrap">
   <?dbhtml filename="expect.html"?>
 
   <sect1info condition="script">
@@ -16,7 +16,7 @@
 
   <title>Expect-&expect-version;</title>
 
-  <indexterm zone="ch-tools-expect">
+  <indexterm zone="ch-system-expect">
     <primary sortas="a-Expect">Expect</primary>
   </indexterm>
 
@@ -116,7 +116,7 @@ ln -svf expect&expect-version;/libexpect&expect-version;.so /usr/lib</userinput>
         <listitem>
           <para>Communicates with other interactive programs according
           to a script</para>
-          <indexterm zone="ch-tools-expect expect">
+          <indexterm zone="ch-system-expect expect">
             <primary sortas="b-expect">expect</primary>
           </indexterm>
         </listitem>
@@ -127,7 +127,7 @@ ln -svf expect&expect-version;/libexpect&expect-version;.so /usr/lib</userinput>
         <listitem>
           <para>Contains functions that allow Expect to be used as a Tcl
           extension or to be used directly from C or C++ (without Tcl)</para>
-          <indexterm zone="ch-tools-expect libexpect">
+          <indexterm zone="ch-system-expect libexpect">
             <primary sortas="c-libexpect-&expect-lib-version;">libexpect-&expect-lib-version;</primary>
           </indexterm>
         </listitem>
diff --git a/chapter08/tcl.xml b/chapter08/tcl.xml
index 6b3aef0f5..4cac2f64a 100644
--- a/chapter08/tcl.xml
+++ b/chapter08/tcl.xml
@@ -7,7 +7,7 @@
   <!ENTITY itcl-ver          "4.2.1">
 ]>
 
-<sect1 id="ch-tools-tcl" role="wrap">
+<sect1 id="ch-system-tcl" role="wrap">
   <?dbhtml filename="tcl.html"?>
 
   <sect1info condition="script">
@@ -18,7 +18,7 @@
 
   <title>Tcl-&tcl-version;</title>
 
-  <indexterm zone="ch-tools-tcl">
+  <indexterm zone="ch-system-tcl">
     <primary sortas="a-Tcl">Tcl</primary>
   </indexterm>
 
@@ -172,7 +172,7 @@ unset SRCDIR</userinput></screen>
         <term><command>tclsh&tcl-major-version;</command></term>
         <listitem>
           <para>The Tcl command shell</para>
-          <indexterm zone="ch-tools-tcl tclsh&tcl-major-version;">
+          <indexterm zone="ch-system-tcl tclsh&tcl-major-version;">
             <primary sortas="b-tclsh&tcl-major-version;">tclsh&tcl-major-version;</primary>
           </indexterm>
         </listitem>
@@ -182,7 +182,7 @@ unset SRCDIR</userinput></screen>
         <term><command>tclsh</command></term>
         <listitem>
           <para>A link to tclsh&tcl-major-version;</para>
-          <indexterm zone="ch-tools-tcl tclsh">
+          <indexterm zone="ch-system-tcl tclsh">
             <primary sortas="b-tclsh">tclsh</primary>
           </indexterm>
         </listitem>
@@ -192,7 +192,7 @@ unset SRCDIR</userinput></screen>
         <term><filename class="libraryfile">libtcl&tcl-major-version;.so</filename></term>
         <listitem>
           <para>The Tcl library</para>
-          <indexterm zone="ch-tools-tcl libtcl&tcl-major-version;.so">
+          <indexterm zone="ch-system-tcl libtcl&tcl-major-version;.so">
             <primary sortas="c-libtcl&tcl-major-version;.so">libtcl&tcl-major-version;.so</primary>
           </indexterm>
         </listitem>
@@ -202,7 +202,7 @@ unset SRCDIR</userinput></screen>
         <term><filename class="libraryfile">libtclstub&tcl-major-version;.a</filename></term>
         <listitem>
           <para>The Tcl Stub library</para>
-          <indexterm zone="ch-tools-tcl libtclstub&tcl-major-version;.a">
+          <indexterm zone="ch-system-tcl libtclstub&tcl-major-version;.a">
             <primary sortas="c-libtclstub&tcl-major-version;.a">libtclstub&tcl-major-version;.a</primary>
           </indexterm>
         </listitem>