anchor.diff:              false ->
                   false;
               true ->
  -                Free = free_space(couch_config:get("couchdb", "view_index_dir")),
  +                Free = free_space(couch_index_util:root_dir()),
                   case Free >= SpaceRequired of
                   true ->
                       true;
  
positive.code:     {ok, GroupInfo} ->
          case can_view_compact(Config, DbName, GroupId, GroupInfo) of
          true ->
              {ok, CompactPid} = couch_view_compactor:start_compact(DbName, GroupId),
              TimeLeft = compact_time_left(Config),
              MonRef = erlang:monitor(process, CompactPid),
              receive
              {'DOWN', MonRef, process, CompactPid, normal} ->
                  ok;
              {'DOWN', MonRef, process, CompactPid, Reason} ->
                  ?LOG_ERROR("Compaction daemon - an error ocurred while compacting"
                      " the view group `~s` from database `~s`: ~p",
                      [GroupId, DbName, Reason]),
  
negative.code:                     "view group `~s` of the database `~s` because it's exceeding"
                      " the allowed period.", [GroupId, DbName]),
                  erlang:demonitor(MonRef, [flush]),
                  ok = couch_mrview:cancel_compaction(DbName, DDocId),
                  timeout
              end;
          false ->
  