Handle custom array classes in help.

[DEVELOPMENT ENVIRONMENT]
* BUG: Handle custom array classes in help.
This commit is contained in:
gambas 2019-12-30 19:50:18 +01:00
parent c364aa22da
commit 41ddd4b946

View File

@ -819,7 +819,12 @@ Public Function GetHelpURL(Optional bShowFile As Boolean) As String
sPath = MHelp.GetURL("comp")
sComp = MHelp.ActualComponent(Component)
sPath &/= LCase(sComp)
sPath &/= LCase(Class) 'Left(Class) & Replace(Mid(Class, 2), "_", "."))
' We keep the class case for custom object arrays
If Class Ends "[]" And If Not hComp[Class] Then
sPath &/= Class
Else
sPath &/= LCase(Class) 'Left(Class) & Replace(Mid(Class, 2), "_", "."))
Endif
sName = LCase(Name)
'sName = Left(sName) & Replace(Mid$(sName, 2), "_", ".")