From 3b4fe170653fd07678665fb8ff7ee08c30fa4e7e Mon Sep 17 00:00:00 2001
From: Michael Sweet <michael.r.sweet@gmail.com>
Date: Wed, 7 Jun 2017 16:16:25 -0400
Subject: [PATCH] Support @exclude ...@ for constants, too.

---
 doc/mxml.man | 2 +-
 mxmldoc.c    | 6 ++++++
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/doc/mxml.man b/doc/mxml.man
index 4d79ff9..f04d49d 100644
--- a/doc/mxml.man
+++ b/doc/mxml.man
@@ -1,4 +1,4 @@
-.TH mxml 3 "Mini-XML API" "06/06/17" "Mini-XML API"
+.TH mxml 3 "Mini-XML API" "06/07/17" "Mini-XML API"
 .SH NAME
 mxml \- Mini-XML API
 .SH INCLUDE FILE
diff --git a/mxmldoc.c b/mxmldoc.c
index 6e89d26..965969d 100644
--- a/mxmldoc.c
+++ b/mxmldoc.c
@@ -5340,11 +5340,17 @@ write_html_body(
       fputs("      <h4 class=\"constants\">Constants</h4>\n"
             "      <dl>\n", out);
 
+#if 0
       for (arg = mxmlFindElement(scut, scut, "constant", NULL, NULL,
                         	 MXML_DESCEND_FIRST);
 	   arg;
 	   arg = mxmlFindElement(arg, scut, "constant", NULL, NULL,
                         	 MXML_NO_DESCEND))
+#else
+      for (arg = find_public(scut, scut, "constant", NULL, mode);
+	   arg;
+	   arg = find_public(arg, scut, "constant", NULL, mode))
+#endif // 0
       {
 	description = mxmlFindElement(arg, arg, "description", NULL,
                                       NULL, MXML_DESCEND_FIRST);