Index: Doc/buildChm.tcl
==================================================================
--- Doc/buildChm.tcl
+++ Doc/buildChm.tcl
@@ -66,17 +66,11 @@
   #
   if {$cdata} then {
     #
     # NOTE: Grab everything within the CDATA tags and use verbatim.
     #
-    set cdataCount [regsub -all -- {<![CDATA[(.*?)]]>} $data {\1} data]
-
-    if {$cdataCount > 0} then {
-      incr count $cdataCount
-    } else {
-      # puts stdout "*WARNING* File \"$fileName\" has no CDATA"
-    }
+    incr count [regsub -all -- {<![CDATA[(.*?)]]>} $data {\1} data]
   }
 
   #
   # TODO: Handle all the HTML tags we know may be present in the virtual
   #       table method documentation.  This may need adjustments in the
@@ -93,11 +87,11 @@
     set from [string map [list < &lt\; > &gt\;] $to]
     incr count [regsub -all -- $from $data $to data]
   }
 
   #
-  # NOTE: Issue a warning if the "href" pattern was not matched.
+  # NOTE: Issue a warning if the HTML tag patterns were not matched.
   #
   if {$count == 0} then {
     puts stdout "*WARNING* File \"$fileName\" has no supported HTML tags"
   }