anchor.diff:      pad.BringToFront()
       let padContent = pad.Content :?> FakePad
   
  -    padContent.Run (string project.BaseDirectory, matchedString)
  +    padContent.Run (string solution.BaseDirectory, matchedString, scriptPath)
   
   type FakeSearchCategory() =
     inherit SearchCategory("FAKE", sortOrder = SearchCategory.FirstCategory)
  
positive.code: 
    override x.GetResults(searchCallback, pattern, token) =
  
      let addResult (solution: Solution, m: Match, rank) = 
        if token.IsCancellationRequested then ()
        else
          let sr = FakeSearchResult(solution, pattern.Pattern, m.Groups.[1].Value, rank)
          searchCallback.ReportResult sr
  
      Task.Run(
  
negative.code:     let font = Pango.FontDescription.FromString(fontName)
      view.SetFont(font)
  
  type FakeSearchResult(solution: Solution, match', matchedString, rank, scriptPath) =
    inherit SearchResult(match', matchedString, rank)
  
    override x.SearchResultType =
      SearchResultType.Type
  
    override x.Description =
      sprintf "Runs the FAKE %s task in %s" matchedString solution.Name
  
    override x.PlainText = "FAKE " + matchedString
  
  