anchor.diff:  
           forceShare = if args ? forceShare then args.forceShare else ["man" "doc" "info"];
           forceCopy = ["COPYING" "LICENSE" "DISTRIBUTION" "LEGAL" 
  -          "README" "AUTHORS" "ChangeLog" "CHANGES"] ++ 
  +          "README" "AUTHORS" "ChangeLog" "CHANGES" "LICENCE" "COPYRIGHT"] ++ 
             (optional (getAttr ["forceCopyDoc"] true args) "doc"); 
   
           archiveType = s: 
  
positive.code:         surroundWithCommands = x : before : after : {deps=x.deps; text = before + "\n" +
                  x.text + "\n" + after ;};
  
          realPhaseNames = args.phaseNames ++ 
            ["doForceShare" "doPropagate" "doForceCopy"]
            ++
            (optional (getAttr ["doCheck"] false args) "doMakeCheck")
            ++
  
negative.code:         ") ["minInit" "defEnsureDir"];
  
          doForceCopy = FullDepEntry (''
                  name="$(basename $out)"
                  name="''${name#*-}"
                  ensureDir "$prefix/share/$name"
                  for f in ${toString forceCopy}; do
                          cp -r "$f" "$prefix/share/$name/$f" || true
  