fix the weird list/binary behavior

aweber · Jul 30, 2015 · 0e504d0 · 0e504d0
1 parent 6a5a2d0
commit 0e504d0
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/src/autocluster_consul.erl b/src/autocluster_consul.erl
@@ -187,7 +187,12 @@ host_sname(Value) ->
   Parts = string:tokens(binary_to_list(Value), "."),
   case length(Parts) of
     1 -> binary_to_list(Value);
-    _ -> binary_to_list(lists:nth(1, Parts))
+    _ ->
+      SName = lists:nth(1, Parts),
+      case is_list(SName) of
+        true -> SName;
+        false -> binary_to_list(SName)
+      end
   end.