anchor.diff:                      | _ -> finish
                   editor.SetSelection(start, finish)
                   ClipboardActions.Cut editor
  +            | Yank ->
  +                let finish =
  +                    match command.textObject with
  +                    | ForwardToEndOfWord -> finish + 1
  +                    | _ -> finish
  +                editor.SetSelection(start, finish)
  +                ClipboardActions.Copy editor
  +                editor.ClearSelection()
               | Visual -> editor.SetSelection(start, finish)
               | Undo -> MiscActions.Undo editor
               | InsertLineBelow -> MiscActions.InsertNewLineAtEnd editor
  
positive.code:         | "d" -> Some Delete
          | "c" -> Some Change
          | "v" -> Some Visual
          | "g" -> Some Go
          | _ -> None
  
  
negative.code:             | NormalMode, [ "u" ] -> [ run Undo Nothing ]
              | NormalMode, [ "d"; "d" ] -> [ run Delete WholeLine ]
              | NormalMode, [ "c"; "c" ] -> [ run Delete WholeLine; run (SwitchMode InsertMode) Nothing ]
              | NormalMode, [ "y"; "y" ] -> [ run Yank WholeLine ]
              | NormalMode, [ "C" ] -> [ run Delete EndOfLine; run (SwitchMode InsertMode) Nothing ]
              | NormalMode, [ "D" ] -> [ run Delete EndOfLine ]
              | NormalMode, [ "x" ] -> [ run Delete CurrentLocation ]
  