diff options
| author | Matthias Radestock <matthias@lshift.net> | 2009-11-04 16:08:35 +0000 |
|---|---|---|
| committer | Matthias Radestock <matthias@lshift.net> | 2009-11-04 16:08:35 +0000 |
| commit | b0743d29a715343c813eff898d187d02cb02ca4c (patch) | |
| tree | 9037e7b94b443e76a98bfb7825c6479087f2dde8 /generate_app | |
| parent | 5b6ca852ff301c0ad9e45562d8d89ebbf23645b3 (diff) | |
| parent | f381c6f7f6d7defc7aeb7011cbe5117c828082b4 (diff) | |
| download | rabbitmq-server-git-b0743d29a715343c813eff898d187d02cb02ca4c.tar.gz | |
merge bug21782 into default
Diffstat (limited to 'generate_app')
| -rw-r--r-- | generate_app | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/generate_app b/generate_app index 623012927e..576b485e1e 100644 --- a/generate_app +++ b/generate_app @@ -1,10 +1,12 @@ #!/usr/bin/env escript %% -*- erlang -*- -main([BeamDir]) -> +main([BeamDir, TargetFile]) -> Modules = [list_to_atom(filename:basename(F, ".beam")) || F <- filelib:wildcard("*.beam", BeamDir)], {ok, {application, Application, Properties}} = io:read(''), NewProperties = lists:keyreplace(modules, 1, Properties, {modules, Modules}), - io:format("~p.", [{application, Application, NewProperties}]). + file:write_file( + TargetFile, + io_lib:format("~p.~n", [{application, Application, NewProperties}])). |