Fix service_info options processing

diff --git a/src/mod_disco.erl b/src/mod_disco.erl
index ba4e59ab3bff6a03dcb8b08e15731861c552def1..627b9ab0f6faeec435652a9cc4b8391cb2e80354 100644 (file)
--- a/src/mod_disco.erl
+++ b/src/mod_disco.erl
@@ -488,10 +488,10 @@ get_fields_xml(Host, Module) ->
                        lists:map(
                          fun(Opts) ->
                                  Mods = proplists:get_value(modules, Opts, all),
-                                 Name = proplists:get_value(names, Opts, <<>>),
+                                 Name = proplists:get_value(name, Opts, <<>>),
                                  URLs = proplists:get_value(urls, Opts, []),
                                  {Mods, Name, URLs}
-                         end, lists:flatten(L))
+                         end, L)
                end, []),
     Fields_good = lists:filter(fun ({Modules, _, _}) ->
                                       case Modules of