anchor.diff:  
           let undoRename move openPath oldNode currentName (model: MainModel) =
               let parentPath = oldNode.Path.Parent
  -            let node = { oldNode with Name = currentName; Path = parentPath.Join currentName}
  -            try
  -                move node.Path oldNode.Path
  +            let currentPath = parentPath.Join currentName
  +            try
  +                move currentPath oldNode.Path
                   openPath parentPath (SelectName oldNode.Name) model
               with ex ->
  +                let node = { oldNode with Name = currentName; Path = currentPath }
                   let action = RenamedItem (node, oldNode.Name)
                   model |> MainStatus.setActionExceptionStatus action ex
   
  
positive.code:                 else
                      let newName =
                          if bufferAction = Copy && sameFolder then
                              let exists name =
                                  match getNode (model.Path.Join name) with
                                  | Some _ -> true
                                  | None -> false
                              Seq.init 99 (getCopyName node.Name) |> Seq.find (not << exists)
                          else
                              node.Name
  
negative.code:             if inputMode.AllowedOnNodeType model.SelectedNode.Type then
                  let text, pos =
                      match inputMode with
                      | Rename pos -> model.SelectedNode.Name, (Some pos)
                      | _ -> "", None
                  model.CommandInputMode <- Some inputMode
                  model.CommandText <- text
                  setCommandSelection pos model
  