Skip to content

Commit 9ada3df

Browse files
authored
Better handling of generated INT routines in project folders (#1317)
1 parent 4abf622 commit 9ada3df

File tree

1 file changed

+3
-1
lines changed

1 file changed

+3
-1
lines changed

src/utils/FileProviderUtil.ts

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -43,7 +43,8 @@ export async function projectContentsFromUri(uri: vscode.Uri, overrideFlat?: boo
4343
"(pil.Type = 'CLS' AND ?||sod.Name = pil.Name||'.cls') OR (pil.Type = 'PKG' AND ?||sod.Name = pil.Name) OR " +
4444
"((pil.Type = 'CLS' OR pil.Type = 'PKG') AND pil.Name %STARTSWITH ?||sod.Name||'.') " +
4545
"WHERE pil.Type = 'CLS' OR pil.Type = 'PKG' " +
46-
"UNION SELECT CASE WHEN $LENGTH(SUBSTR(sod.Name,?),'.') > 2 THEN $PIECE(SUBSTR(sod.Name,?),'.') ELSE SUBSTR(sod.Name,?) END Name, pil.Type FROM " +
46+
'UNION SELECT CASE WHEN ($LENGTH(SUBSTR(sod.Name,?),\'.\') > 2 AND NOT (SUBSTR(sod.Name,?) %PATTERN \'.E1"."0.1"G"1N1".int"\')) ' +
47+
"THEN $PIECE(SUBSTR(sod.Name,?),'.') ELSE SUBSTR(sod.Name,?) END Name, pil.Type FROM " +
4748
"%Library.RoutineMgr_StudioOpenDialog(?,1,1,1,1,0,1) AS sod JOIN %Studio.Project_ProjectItemsList(?) AS pil ON " +
4849
"pil.Type = 'MAC' AND sod.Name = pil.Name " +
4950
"UNION SELECT sod.Name, pil.Type FROM " +
@@ -65,6 +66,7 @@ export async function projectContentsFromUri(uri: vscode.Uri, overrideFlat?: boo
6566
l,
6667
l,
6768
l,
69+
l,
6870
`${folderDots}*.${["mac", "int", "inc", "bas", "mvi"].join(`,${folderDots}*.`)}`,
6971
project,
7072
folder + "*",

0 commit comments

Comments
 (0)