diff options
| author | Michael Bridgen <mikeb@lshift.net> | 2009-12-18 15:36:58 +0000 |
|---|---|---|
| committer | Michael Bridgen <mikeb@lshift.net> | 2009-12-18 15:36:58 +0000 |
| commit | 21b9b3d0d7c337fd562e2d03610a7fd8ea1b03dc (patch) | |
| tree | 28a5906c4f5c68d165ef45c30e89f30aa57e2e56 /generate_app | |
| parent | c706e4f9d3daebd9ed992e3280ff2b0b921af347 (diff) | |
| parent | d74a371b279a99373f5580084879b5e12e2a8e62 (diff) | |
| download | rabbitmq-server-git-21b9b3d0d7c337fd562e2d03610a7fd8ea1b03dc.tar.gz | |
Merge no-pluggable-exchange branch into v1.7-series branch.
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}])). |