anchor.diff:      promise {
           let url = ServerUrls.WishList
           let body = toJson wishList
  -        let props = 
  +        let props =
               [ RequestProperties.Method HttpMethod.POST
                 Fetch.requestHeaders [
                   HttpRequestHeaders.Authorization ("Bearer " + token)
  
positive.code:                     div [ClassName ("form-group has-feedback " + linkStatus)] [
                           yield div [ClassName "input-group"] [
                               yield span [ClassName "input-group-addon"] [span [ClassName "glyphicon glyphicon glyphicon-pencil"] [] ]
                               yield input [ 
                                      Key ("Link_" + model.NewBookId.ToString())
                                      HTMLAttr.Type "text"
                                      Name "Link"
  
negative.code:       AuthorsErrorText = None
        ResetTime = None
        LinkErrorText = None
        ErrorMsg = None },
          Cmd.batch [
              loadWishListCmd user.Token
              loadResetTimeCmd user.Token ]
  
  let update f (msg:Msg) model : Model*Cmd<'a> =
      match msg with
      | LoadForUser user ->
          model, Cmd.none
  