Changeset 1249

Show
Ignore:
Timestamp:
1/19/2010 2:32:51 AM (2 months ago)
Author:
vessper
Message:

19/01/2010


- Prism: BP values now nil if they are of an unknown type

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/EveHQ.Prism/Forms/frmPrism.vb

    r1248 r1249  
    974974                                    If PlugInData.BlueprintAssets(owner).ContainsKey(newAsset.Tag.ToString) = True Then 
    975975                                        Dim chkBPO As BlueprintAsset = PlugInData.BlueprintAssets(owner).Item(newAsset.Tag.ToString) 
    976                                         If chkBPO.Runs > -1 Then 
     976                                        If chkBPO.Runs > -1 Or chkBPO.BPType = BPType.Unknown Then 
    977977                                            IsBPO = False 
    978                                             newAsset.Text = newAsset.Text.Replace("Blueprint", "Blueprint Copy") 
     978                                            If chkBPO.BPType <> BPType.Unknown Then 
     979                                                newAsset.Text = newAsset.Text.Replace("Blueprint", "BPC") 
     980                                            End If 
    979981                                        Else 
    980                                             newAsset.Text = newAsset.Text.Replace("Blueprint", "Blueprint Orig") 
     982                                            newAsset.Text = newAsset.Text.Replace("Blueprint", "BPO") 
    981983                                        End If 
    982984                                    End If 
     
    11271129                        If PlugInData.BlueprintAssets(assetOwner).ContainsKey(subAsset.Tag.ToString) = True Then 
    11281130                            Dim chkBPO As BlueprintAsset = PlugInData.BlueprintAssets(assetOwner).Item(subAsset.Tag.ToString) 
    1129                             If chkBPO.Runs > -1 Then 
     1131                            If chkBPO.Runs > -1 Or chkBPO.BPType = BPType.Unknown Then 
    11301132                                IsBPO = False 
    1131                                 subAsset.Text = subAsset.Text.Replace("Blueprint", "Blueprint Copy") 
     1133                                If chkBPO.BPType <> BPType.Unknown Then 
     1134                                    subAsset.Text = subAsset.Text.Replace("Blueprint", "BPC") 
     1135                                End If 
    11321136                            Else 
    1133                                 subAsset.Text = subAsset.Text.Replace("Blueprint", "Blueprint Orig") 
     1137                                subAsset.Text = subAsset.Text.Replace("Blueprint", "BPO") 
    11341138                            End If 
    11351139                        End If