Changeset 1251

Show
Ignore:
Timestamp:
1/19/2010 3:02:01 AM (2 months ago)
Author:
vessper
Message:

19/01/2010


- HQF: Fixed crash trying to show market group where no market group info is available

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/EveHQ.HQF/Forms/frmHQF.vb

    r1221 r1251  
    22352235        Dim cModule As ShipModule = CType(ModuleLists.moduleList.Item(moduleID), ShipModule) 
    22362236        Dim pathLine As String = CStr(Market.MarketGroupPath(cModule.MarketGroup)) 
    2237         ShipModule.DisplayedMarketGroup = pathLine 
     2237        If pathLine IsNot Nothing Then 
     2238            ShipModule.DisplayedMarketGroup = pathLine 
     2239        Else 
     2240            MessageBox.Show("Unable to display Market Group due to absence of Market Group information in HQF.", "Unable to Show Market Group", MessageBoxButtons.OK, MessageBoxIcon.Information) 
     2241        End If 
    22382242    End Sub 
    22392243