diff options
| author | Essien Ita Essien <essiene@gmail.com> | 2009-01-29 12:26:10 +0100 |
|---|---|---|
| committer | Essien Ita Essien <essiene@gmail.com> | 2009-01-29 12:26:10 +0100 |
| commit | bcb4308d58e71c4e8544c988e0a630717895cf7c (patch) | |
| tree | 2e968e0326a142d8b476dffe50eb81a4d9d23fd2 /generate_app | |
| parent | 0370c95e47a65eaff8a3c3ca8c7c1904a0811d5b (diff) | |
| parent | 268703e9cd1ccd4faa98dd23752a24e0336fe104 (diff) | |
| download | rabbitmq-server-git-bcb4308d58e71c4e8544c988e0a630717895cf7c.tar.gz | |
Merged with upstream
Diffstat (limited to 'generate_app')
| -rw-r--r-- | generate_app | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/generate_app b/generate_app new file mode 100644 index 0000000000..623012927e --- /dev/null +++ b/generate_app @@ -0,0 +1,10 @@ +#!/usr/bin/env escript +%% -*- erlang -*- + +main([BeamDir]) -> + 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}]). |