@@ -11029,11 +11029,12 @@ private function revIDEGetDocsGuideData
1102911029 put empty into tExtensionGuide
1103011030 put tExtensionData ["folder" ] into tFolder
1103111031 put revEnvironmentUserDocsPath() & slash & \
11032- the last item of tFolder into tCachedDataFolder
11032+ tExtensionData [ "name" ] into tCachedDataFolder
1103311033 put tFolder & slash & "guide.md" into tGuideFile
1103411034 if there is not a file tGuideFile then
1103511035 -- User widgets have the guide.md in docs/guide/
11036- put tFolder & slash & "docs/guide/guide.md" into tGuideFile
11036+ put "/docs/guide" after tFolder
11037+ put tFolder & slash & "guide.md" into tGuideFile
1103711038 end if
1103811039 if there is not a file tGuideFile then next repeat
1103911040 revIDEEnsurePath tCachedDataFolder
@@ -11052,8 +11053,10 @@ private function revIDEGetDocsGuideData
1105211053
1105311054 if tGuide is not empty then
1105411055 put "{" & CR after tExtensionGuide
11055- put tab & quote & "name" & quote & ":" && quote & tFolder & quote & comma & CR after tExtensionGuide
11056- put tab & quote & "display name" & quote & ":" && quote & tFolder & quote & comma & CR after tExtensionGuide
11056+ put tab & quote & "name" & quote & ":" && quote & tExtensionData ["name" ] & quote & comma & CR after tExtensionGuide
11057+ put tab & quote & "display name" & quote & ":" && quote & tExtensionData ["title" ] & quote & comma & CR after tExtensionGuide
11058+ put tab & quote & "group" & quote & ":" && quote & "Extensions" & quote & comma & CR after tExtensionGuide
11059+ put tab & quote & "location" & quote & ":" && quote & tFolder & quote & comma & CR after tExtensionGuide
1105711060 put quote & "data" & quote & ":" & escape(tGuide , true ) & CR after tExtensionGuide
1105811061 put "}" after tExtensionGuide
1105911062
0 commit comments