anchor.diff:  
       let memberTypes = [  MembershipTypePublic.Member; MembershipTypePublic.Moderator; MembershipTypePublic.Admin ]
   
  -    let cancelPoll = new Threading.CancellationTokenSource()
  -   
       let barButtons () =
           [|
               yield controller.MoreButton
  
positive.code:         this.WebView.ScrollView.AddSubview refresh
          #endif
  
          Async.Start(Utility.Timer.ticker (fun _ -> this.InvokeOnMainThread(fun _->  
              if events.Count > 0 then
                  let eventsBuilder = new System.Text.StringBuilder()
                  for (event, json) in events do
                      let json = String.Format( "[{0},{1},{2},{3},'{4}']",event.Sequence, event.EventType, event.Stamp, json, event.User)
                      eventsBuilder.AppendFormat ("wireclub.Channel.processChannelEvents('{0}', {1});", entity.Id, json) |> ignore
  
                  this.WebView.EvaluateJavascript (eventsBuilder.ToString()) |> ignore
                  events.Clear()
          )) 500)
  
      member this.ProcessEvent(event:ChannelEvent) =
          match event.Event with
  
negative.code:         | AppEvent (_, json)
          | CustomAppEvent json -> events.Add (event, json)
          | _ -> ()
  
       
  
  [<Register ("ChatRoomUsersViewController")>]
  type ChatRoomUsersViewController (users:UserProfile[]) =
  