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 | 0c2f69b0b847f4d99bf1b641ee8d2cd3cb2569b0 (patch) | |
| tree | 6db34cc4310d9c730ab23537f4ccadf78eef23a5 /src | |
| parent | fb11a2b39ff24c9dd2cfcb055b65dd05b1ee1b29 (diff) | |
| download | rabbitmq-server-git-0c2f69b0b847f4d99bf1b641ee8d2cd3cb2569b0.tar.gz | |
I keep forgetting the trailing ".".
Diffstat (limited to 'src')
| -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 fbb89db7fc..5b10004f03 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 |