diff options
| author | Richard Carlsson <[email protected]> | 2011-08-02 13:11:23 +0200 |
|---|---|---|
| committer | Henrik Nord <[email protected]> | 2011-08-04 11:27:00 +0200 |
| commit | 403d462964b773516a99726129ea8dcdcc9a96f5 (patch) | |
| tree | 2a27d637402666c82236878b7a077a9183578936 /lib/edoc/src/edoc_extract.erl | |
| parent | 07936436b8a8b18b80451a09e040283ebecbd43b (diff) | |
| download | otp-403d462964b773516a99726129ea8dcdcc9a96f5.tar.gz otp-403d462964b773516a99726129ea8dcdcc9a96f5.tar.bz2 otp-403d462964b773516a99726129ea8dcdcc9a96f5.zip | |
synchronized with edoc development version
Diffstat (limited to 'lib/edoc/src/edoc_extract.erl')
| -rw-r--r-- | lib/edoc/src/edoc_extract.erl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/edoc/src/edoc_extract.erl b/lib/edoc/src/edoc_extract.erl index 5e28762c53..5e1c212961 100644 --- a/lib/edoc/src/edoc_extract.erl +++ b/lib/edoc/src/edoc_extract.erl @@ -238,8 +238,8 @@ file(File, Context, Env, Opts) -> case file:read_file(File) of {ok, Bin} -> {ok, text(binary_to_list(Bin), Context, Env, Opts, File)}; - {error, _R} = Error -> - Error + {error, _} = Error -> + Error end. @@ -298,8 +298,8 @@ get_module_info(Forms, File) -> {Name, Vars} = case lists:keyfind(module, 1, L) of {module, N} when is_atom(N) -> {N, none}; - {module, {N, _Vs} = NVs} when is_atom(N) -> - NVs; + {module, {N, _}=Mod} when is_atom(N) -> + Mod; _ -> report(File, "module name missing.", []), exit(error) |