Make reformat-indexes print default parameters

basho · Apr 1, 2013 · 1bfaeae · 1bfaeae
1 parent 3e1ec43
commit 1bfaeae
Showing 1 changed file with 11 additions and 1 deletion.
diff --git a/src/riak_kv_console.erl b/src/riak_kv_console.erl
@@ -431,7 +431,17 @@ parse_int(IntStr) ->
     end.
 
 index_reformat_options([], Opts) ->
-    Opts;
+    Defaults = [{concurrency, 2}, {batch_size, 100}],
+    AddIfAbsent =
+        fun({Name,Val}, Acc) ->
+            case lists:keymember(Name, 1, Acc) of
+                true ->
+                    Acc;
+                false ->
+                    [{Name, Val} | Acc]
+            end
+        end,
+    lists:foldl(AddIfAbsent, Opts, Defaults);
 index_reformat_options(["--downgrade"], Opts) ->
     [{downgrade, true} | Opts];
 index_reformat_options(["--downgrade" | More], _Opts) ->