Fetching contributors…
Cannot retrieve contributors at this time
executable file 50 lines (46 sloc) 1.27 KB
#!/usr/bin/env escript
%% -*- erlang -*-
%% edown is designed to work well with rebar, but in order to use edown
%% to document itself, we need to explicitly set the path to ebin/, so
%% that we pick up the newly built edown doclet. I haven't found a way
%% to do this with 'rebar doc'.
%%
main([]) ->
code:add_patha("ebin"),
Default = "uwiger",
U = case os:getenv("TGT") of
[] -> Default;
false -> Default;
Str -> Str
end,
TopURL = top_url(U),
io:fwrite("Making edown docs for [~s]...~n", [TopURL]),
R = edoc:application(edown, ".",
[{doclet, edown_doclet},
{source_path, ["src"]},
{app_default,"http://www.erlang.org/doc/man"},
{stylesheet, ""}, % don't copy stylesheet.css
{image, ""}, % don't copy erlang.png
{edown_target, target()},
{top_level_readme,
{"./README.md", TopURL}}]),
case R of
ok ->
halt();
Err ->
io:fwrite("~p~n", [Err]),
halt(1)
end.
top_url(User) ->
case os:getenv("EDOWN_TOP_URL") of
false ->
"http://github.com/" ++ User ++ "/edown";
URL ->
URL
end.
target() ->
case os:getenv("EDOWN_TARGET") of
false -> github;
"github" -> github;
"stash" -> stash
end.