[latex3-commits] [latex3/latex3] main: Suppress deprecated and non-doc fns in l3doc (05a451644)

[github at latex-project.org]

Repository : https://github.com/latex3/latex3
On branch  : main
Link       : https://github.com/latex3/latex3/commit/05a451644427fdf1fa04a474aa4a6cd979185e37

>---------------------------------------------------------------

commit 05a451644427fdf1fa04a474aa4a6cd979185e37
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Fri Dec 8 09:10:24 2023 +0000

    Suppress deprecated and non-doc fns in l3doc
    
    See #1366 but also more widely makes this status useful.


>---------------------------------------------------------------

05a451644427fdf1fa04a474aa4a6cd979185e37
 l3kernel/l3doc.dtx | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/l3kernel/l3doc.dtx b/l3kernel/l3doc.dtx
index 33fac4692..f4dfdc9c9 100644
--- a/l3kernel/l3doc.dtx
+++ b/l3kernel/l3doc.dtx
@@ -3101,7 +3101,12 @@ and all files in that bundle must be distributed together.
     \DoNotIndex {#1}
     \bool_if:NT #2
       {
-        \@@_if_macro_internal:nF {#1}
+        \bool_lazy_any:nF
+          {
+            { \@@_if_macro_internal_p:n {#1} }
+            { \l_@@_macro_deprecated_bool }
+            { \l_@@_macro_nodoc_bool }
+          }
           { \seq_gput_right:Nn \g_doc_macros_seq {#1} }
         \hbox_set:Nw \l_@@_macro_index_box
           \hbox_unpack_drop:N \l_@@_macro_index_box