anchor.diff:  
           if not (List.isEmpty this.InitActions) then
               let mkCtx (context: IOwinContext) =
  -                let env = Map.ofList [(OwinContextKey, context :> obj)]
                   let session = new OwinCookieUserSession(context)
                   { new IContext with
  -                    member ctx.Environment = env :> _
  +                    member ctx.Environment = upcast mkEnv context HttpContext.Current
                       member ctx.RequestUri = context.Request.Uri
                       member ctx.RootFolder = this.ServerRootDirectory
                       member ctx.UserSession = session :> _
  
positive.code: 
      member this.Invoke(env: Env) =
          let context = OwinContext(env) :> IOwinContext
          let headers =
              O2W.Headers context.Request.Headers
              |> Seq.map (fun h -> (h.Name, h.Value))
  
negative.code:                         p ++ loc
              {
                  ApplicationPath = appPath
                  Environment = mkEnv context httpContext
                  Link = link
                  Json = json
                  Metadata = info
  