anchor.diff:  end.">>)).
   -define(GET_CLUSTER_SNAPSHOT,?GET_CONFIG(snapshotCluster,[],true)).
   -define(GET_CLUSTER_SNAPSHOT_TABLES,?GET_CONFIG(snapshotClusterTables,[],[ddAccount,ddRole,ddConfig])).
  --define(GET_CLUSTER_SNAPSHOT_TOD,?GET_CONFIG(snapshotClusterHourOfDay,[],19)).
  +-define(GET_CLUSTER_SNAPSHOT_TOD,?GET_CONFIG(snapshotClusterHourOfDay,[],14)).
   -define(CLUSTER_SNAP_CHECK_INTERVAL, 3600000).
  -%-define(CLUSTER_SNAP_CHECK_INTERVAL, 40000).
   
   -ifdef(TEST).
       start_snap_loop() -> ok.
  
positive.code:                        ?Error("cluster_snap failed for ~p : ~p", [T, Error]),
                         Tabs++[T]
                 end,
      erlang:send_after(1000, ?MODULE, {cluster_snap, NextTabs, StartTime, Dir}).
  
  handle_info({cluster_snap, Tables, StartTime, Dir}, State) ->
      case ?GET_CLUSTER_SNAPSHOT of
  
negative.code:     process_flag(trap_exit, true),
      start_snap_loop(),
      CST = ?GET_CLUSTER_SNAPSHOT_TABLES,
      erlang:send_after(1000, ?MODULE, {cluster_snap, CST, os:timestamp(),
                                        '$create_when_needed'}),
      {ok,#state{snapdir = SnapshotDir}}.
  
  create_clean_dir(Prefix) ->
  