anchor.diff:      ok = clone_repo(Method, Url, TmpDir),
   
       ?LOG("Extracting meta information\n"),
  -    Meta = extract_info(Method, Url, TmpDir),
  +    Meta = extract_info(Method, Url, TimeBegin, TmpDir),
       ?LOG("Writing meta to ~p\n", [MetaFile]),
       to_file(MetaFile, Meta),
   
  
positive.code: %% API
  
  main (Conf) ->
      URL0         = kf(Conf, url),
      Destination0 = kf(Conf, dest),
      {true,Url} = url(URL0),
  
negative.code:     Exploded = string:tokens(Url, "/"),
      filename:join(tl(Exploded)).
  
  extract_info (git, Url, TimeBegin, TmpDir) ->
      [ {name, repo_name(Url)}
      , {target_path, repo_local_path(Url)}
      , {url, Url}
      , {size_of_repo, ?u:du(TmpDir)}
      , {time_begin, TimeBegin}
      , {method, git}
      , {branches, ?u:git_branches(TmpDir)}
      , {tags, ?u:git_tags(TmpDir)} ];
  extract_info (Other, _, _, _) ->
      throw({badmethod, Other}).
  
  utc () ->
      calendar:universal_time().
  
  clone_repo (git, Url, TmpDir) ->
      ?u:git_clone(Url, TmpDir);
  