From 02bc52fc6aaca0ddb66dbe9e586df10ac82c6bce Mon Sep 17 00:00:00 2001 From: Dave Smith Date: Tue, 22 Jun 2010 13:47:06 -0600 Subject: Add support for embedding VCS info into the version data --- bootstrap | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'bootstrap') diff --git a/bootstrap b/bootstrap index cbd17c3..d9327ba 100755 --- a/bootstrap +++ b/bootstrap @@ -6,6 +6,9 @@ main(Args) -> %% Get a string repr of build time Built = build_time(), + %% Get a string repr of hg changeset + HgInfo = "hg " ++ string:strip(os:cmd("hg identify -i"), both, $\n), + %% Check for force=1 flag to force a rebuild case lists:member("force=1", Args) of true -> @@ -17,7 +20,8 @@ main(Args) -> %% Compile all src/*.erl to ebin case make:files(filelib:wildcard("src/*.erl"), [{outdir, "ebin"}, {i, "include"}, - {d, 'BUILD_TIME', Built}]) of + {d, 'BUILD_TIME', Built}, + {d, 'VCS_INFO', HgInfo}]) of up_to_date -> ok; error -> -- cgit v1.1