backporting fixed for new otp format

BurbasConsulting · Feb 15, 2011 · 11d8397 · 11d8397
1 parent 806a618
commit 11d8397
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/erldocs b/erldocs
diff --git a/src/erldocs_core.erl b/src/erldocs_core.erl
@@ -268,7 +268,9 @@ fun_stuff(App, Mod, {func, [], Child}) ->
            (_Else, Acc) -> Acc
         end,
 
-    lists:foldl(F, [], Child).
+    lists:foldl(F, [], Child);
+fun_stuff(_App, _Mod, _Funs) ->
+    [].
 
 make_name(Name) ->
     Tmp = lists:flatten(Name),
@@ -359,6 +361,8 @@ tr_erlref({note, [], Child}, _Acc) ->
     {'div', [{class, "note"}], [{h2, [], ["Note!"]} | Child]};
 tr_erlref({warning, [], Child}, _Acc) ->
     {'div', [{class, "warning"}], [{h2, [], ["Warning!"]} | Child]};
+tr_erlref({name, [], [{ret,[],[Ret]}, {nametext,[],[Desc]}]}, _Acc) ->
+    {pre, [], [Ret ++ " " ++ Desc]};
 tr_erlref({name, [], Child}, [{ids, Ids}, List, {functions, Funs}]) ->
     case make_name(Child) of
         ignore -> ignore;