anchor.diff:          commands.registerCommand (
               "showProjStatusFromIndicator",
               (fun _ ->
  -                let name = path.basename (ProjectStatus.path)
  +                let name = node.path.basename (ProjectStatus.path)
   
                   ShowStatus.CreateOrShow(ProjectStatus.path, name) |> box |> Some)
           )
  
positive.code:                 item.description <- Some(sprintf "Directory with %i projects" dir.Fsprojs.Length)
                  item
              | WorkspacePeekFound.Solution sln ->
                  let relative = path.relative (workspace.rootPath.Value, sln.Path)
                  let item = createEmpty<QuickPickItem>
                  item.label <- sprintf "%s%s" check relative
                  item.description <- Some(sprintf "Solution with %i projects" (countProjectsInSln sln))
  
negative.code:             match value with
              | ConfiguredWorkspace.Directory dir ->
                  try
                      let stats = node.fs.statSync (U2.Case1 dir)
                      not (isNull stats) && (stats.isDirectory ())
                  with _ ->
                      false
              | ConfiguredWorkspace.Solution sln ->
                  try
                      let stats = node.fs.statSync (U2.Case1 sln)
                      not (isNull stats) && (stats.isFile ())
                  with _ ->
                      false
  