diff options
author | Simon MacMullen <simon@rabbitmq.com> | 2012-03-23 11:24:14 +0000 |
---|---|---|
committer | Simon MacMullen <simon@rabbitmq.com> | 2012-03-23 11:24:14 +0000 |
commit | 185c7d9c23ed45b570052637df3d3488c9b402ff (patch) | |
tree | 6db34cc4310d9c730ab23537f4ccadf78eef23a5 | |
parent | ec030de9d86bcac28b87acb401842b3874556f85 (diff) | |
download | rabbitmq-server-185c7d9c23ed45b570052637df3d3488c9b402ff.tar.gz |
I keep forgetting the trailing ".".
-rw-r--r-- | src/rabbit_cluster_config.erl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/rabbit_cluster_config.erl b/src/rabbit_cluster_config.erl index fbb89db7..5b10004f 100644 --- a/src/rabbit_cluster_config.erl +++ b/src/rabbit_cluster_config.erl @@ -78,7 +78,11 @@ lookup_app(App) -> {ok, Module} -> Module end. -parse(Src) -> +parse(Src0) -> + Src = case lists:reverse(Src0) of + [$. |_] -> Src0; + _ -> Src0 ++ "." + end, case erl_scan:string(Src) of {ok, Scanned, _} -> case erl_parse:parse_term(Scanned) of |