anchor.diff:      let rec getIndentation lineDistance (line: IDocumentLine) = 
           if line = null then "" else
   
  -        match data.GetLineText(line.LineNumber).TrimEnd() with
  +        match editor.GetLineText(line.LineNumber).TrimEnd() with
           | x when String.IsNullOrWhiteSpace(x) -> getIndentation (lineDistance + 1) line.PreviousLine
           | Match i   when lineDistance < 2 -> String(' ', i)
  -        | AddIndent when lineDistance < 2 -> String(' ', line.GetIndentation(data).Length + indentSize)
  -        | _ -> line.GetIndentation data
  +        | AddIndent when lineDistance < 2 -> String(' ', line.GetIndentation(editor).Length + indentSize)
  +        | _ -> line.GetIndentation editor
     
       let getIndentString lineNumber =  
  -        let caretColumn = data.CaretColumn
  -        let line = data.GetLine lineNumber
  +        let caretColumn = editor.CaretColumn
  +        let line = editor.GetLine lineNumber
   
           let indentation = getIndentation 0 line
           if line = null then indentation else
           // Find white space in front of the caret and strip it out
  -        let text = data.GetLineText(line.LineNumber)
  +        let text = editor.GetLineText(line.LineNumber)
           //TODO using 0 instead of column, which we dont have now
           let reIndent = 0 = text.Length + 1 && caretColumn = 1 
           if not reIndent then indentation else
  
positive.code: open MonoDevelop.Ide.Editor
  open MonoDevelop.Ide.Editor.Extension
  
  type FSharpIndentationTracker(data:TextEditor) = 
      inherit IndentationTracker ()
      let indentSize = data.Options.IndentationSize
  
      // Lines ending in  these strings will be indented
      let indenters = ["=";" do"; "("; "{";"[";"[|";"->";" try"; " then"; " else"; "("]
  
negative.code: 
      override x.GetIndentationString (lineNumber) =
          try
              let line = editor.GetLine (lineNumber)
              let indent =
                if line = null then "" else
                  getIndentString lineNumber
  