anchor.diff:  
                   let pxforms = 
                       match (SnapshotTransforms.Position |> Map.tryFind x.SelectedProfile.SnapshotProfile) with
  -                    | None -> "No Snapshot description available"
  +                    | None -> LocStrings.Errors.NoSnapshotDescription
                       | Some (xforms) -> makeStringList xforms
   
                   let uvxforms = 
                       match (SnapshotTransforms.UV |> Map.tryFind x.SelectedProfile.SnapshotProfile) with
  -                    | None -> "No Input description available"
  +                    | None -> LocStrings.Errors.NoSnapshotDescription
                       | Some (xforms) -> makeStringList xforms
                   LocStrings.Snapshot.Header + "\n" + LocStrings.Snapshot.Desc1 + "\n" + LocStrings.Snapshot.PosLabel + pxforms + "\n" 
                   + LocStrings.Snapshot.UVLabel + uvxforms
  
positive.code:         and set (value:string) = 
              let value = value.Trim()
              if value = "" then
                  ViewModelUtil.pushDialog "Profile name may not be empty"
              else
                  config <- {config with ProfileName = value } 
                  save()
  
negative.code:         with get () =
              let inputText = 
                  match (ProfileText.Input.Descriptions |> Map.tryFind x.SelectedProfile.InputProfile) with 
                  | None -> LocStrings.Errors.NoInputDescription
                  | Some (text) ->
                      LocStrings.Input.Header + "\n" + LocStrings.Input.Desc1 + "\n" + LocStrings.Input.Desc2 + "\n" + text
              let snapshotText = 
  