anchor.diff:      process_flag(trap_exit, true),
       start_snap_loop(),
       CST = ?GET_CLUSTER_SNAPSHOT_TABLES,
  -    ?Info("starting ~p snapshot after ~pms",
  -          [CST, ?CLUSTER_SNAP_CHECK_INTERVAL]),
  -    erlang:send_after(?CLUSTER_SNAP_CHECK_INTERVAL, ?MODULE,
  -                      {cluster_snap, CST, os:timestamp(),
  -                       create_clean_dir("backup_snapshot_")}),
  +    erlang:send_after(1000, ?MODULE, {cluster_snap, CST, os:timestamp(),
  +                                      '$create_when_needed'}),
       {ok,#state{snapdir = SnapshotDir}}.
   
   create_clean_dir(Prefix) ->
  
positive.code: 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(CLUSTER_SNAP_CHECK_INTERVAL, 3600000).
  %-define(CLUSTER_SNAP_CHECK_INTERVAL, 40000).
  
  -ifdef(TEST).
      start_snap_loop() -> ok.
  
negative.code:                        ?Error("cluster_snap failed for ~p : ~p", [T, Error]),
                         Tabs++[T]
                 end,
      ?MODULE ! {cluster_snap, NextTabs, StartTime, Dir}.
  
  handle_info({cluster_snap, Tables, StartTime, Dir}, State) ->
      case ?GET_CLUSTER_SNAPSHOT of
  