anchor.diff:       {multiply_timetraps, undefined, "multiply_timetraps", integer, help(multiple_timetraps)}, %% Integer
        {scale_timetraps, undefined, "scale_timetraps", boolean, help(scale_timetraps)},
        {create_priv_dir, undefined, "create_priv_dir", string, help(create_priv_dir)},
  +     {readable, undefined, "readable", boolean, help(readable)},
        {verbose, $v, "verbose", boolean, help(verbose)}
       ].
   
  
positive.code: 
  cfgopts(State) ->
      Opts = rebar_state:get(State, ct_opts, []),
      add_hooks(rebar_utils:filtermap(fun filter_opts/1, Opts)).
  
  filter_opts({test_spec, _}) ->
      ?WARN("Test specs not supported", []),
  
negative.code:                              Suites)}};
  filter_opts(_) -> true.
  
  add_hooks(Opts, State) ->
      case {readable(State), lists:keyfind(ct_hooks, 1, Opts)} of
          {false, _} ->
              Opts;
          {true, false} ->
              [{ct_hooks, [cth_readable_failonly, cth_readable_shell]} | Opts];
          {true, {ct_hooks, Hooks}} ->
              %% Make sure hooks are there once only.
              ReadableHooks = [cth_readable_failonly, cth_readable_shell],
              NewHooks =  (Hooks -- ReadableHooks) ++ ReadableHooks,
  