Skip to content
This repository was archived by the owner on Aug 31, 2021. It is now read-only.

Commit 615f579

Browse files
Merge pull request #1864 from livecode/bugfix-dictionary_bfs
[[ Bug ]] Ensure dictionary gen ignores protected stacks
2 parents a338750 + ac810be commit 615f579

1 file changed

Lines changed: 26 additions & 11 deletions

File tree

Toolset/libraries/revidelibrary.8.livecodescript

Lines changed: 26 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -10759,16 +10759,24 @@ private function revIDEGetExtensionDocsData pAPI
1075910759
if tExtensionData["source_type"] is "lcb" then
1076010760
dispatch function "revDocsGenerateDocsFileFromModularFile" to stack "revDocsParser" with \
1076110761
tFolder & slash & tSource
10762+
put the result into tDoc
1076210763
else if tExtensionData["source_type"] is "lcs" then
10763-
local tStack
10764-
put the long id of stack (tFolder & slash & tSource) into tStack
10765-
dispatch function "revDocsGenerateDocsFileFromText" to stack "revDocsParser" with \
10764+
local tStack, tPassword
10765+
try
10766+
put the long id of stack (tFolder & slash & tSource) into tStack
10767+
put the password of tStack into tPassword
10768+
end try
10769+
if tStack is not empty and tPassword is empty then
10770+
dispatch function "revDocsGenerateDocsFileFromText" \
10771+
to stack "revDocsParser" with \
1076610772
the script of tStack, tStack
10773+
put the result into tDoc
10774+
end if
10775+
end if
10776+
if tDoc is not empty then
10777+
# Output the lcdoc file
10778+
revIDESetUTF8FileContents tAPIDoc, tDoc
1076710779
end if
10768-
put the result into tDoc
10769-
10770-
# Output the lcdoc file
10771-
revIDESetUTF8FileContents tAPIDoc, tDoc
1077210780
end if
1077310781

1077410782
local tAPIJS
@@ -11122,10 +11130,17 @@ private command revIDEGenerateDistributedAPI
1112211130
put the stackfiles of stack "home" into tIDELibs
1112311131
split tIDELibs by return and comma
1112411132
repeat for each key tStackName in tIDELibs
11125-
get revDocsGenerateDocsFileFromText(the script of stack tStackName, \
11126-
the long id of stack tStackName)
11127-
if it is not empty then
11128-
put it into tIDEA[tIDECount]
11133+
local tStack, tPassword, tDoc
11134+
try
11135+
put the long id of stack tStackName into tStack
11136+
put the password of tStack into tPassword
11137+
end try
11138+
if tStack is not empty and tPassword is empty then
11139+
put revDocsGenerateDocsFileFromText(the script of tStack, \
11140+
tStack) into tDoc
11141+
end if
11142+
if tDoc is not empty then
11143+
put tDoc into tIDEA[tIDECount]
1112911144
add 1 to tIDECount
1113011145
end if
1113111146
end repeat

0 commit comments

Comments
 (0)