Handle case that module exports mod_doc, but nothing in it

2022-09-30 19:05:04 +02:00 · 2022-09-30 19:05:04 +02:00 · 77f9254f45
parent 77dacf92d2
commit 77f9254f45
1 changed files with 4 additions and 1 deletions
--- a/src/ejabberd_doc.erl
+++ b/src/ejabberd_doc.erl
@ -48,7 +48,10 @@ man(Lang) ->
                                  {[{M, Descr, DocOpts, #{example => Example}}|Mods], SubMods};
                              #{opts := DocOpts} ->
                                  {ParentMod, Backend} = strip_backend_suffix(M),
-                                  {Mods, dict:append(ParentMod, {M, Backend, DocOpts}, SubMods)}
+                                  {Mods, dict:append(ParentMod, {M, Backend, DocOpts}, SubMods)};
+                              #{} ->
+                                  warn("module ~s is not properly documented", [M]),
+                                  Acc
                          catch _:undef ->
                                  case erlang:function_exported(
                                         M, mod_options, 1) of