From 716b984e94af4b089934fa456696ae1fd5e81524 Mon Sep 17 00:00:00 2001
From: Fellippe Heitor <fellippeheitor@gmail.com>
Date: Sun, 21 Feb 2021 11:53:57 -0300
Subject: [PATCH] Adapts sh to consider the last $include in a line valid.

---
 source/ide/ide_methods.bas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas
index b27896373..9a3101142 100644
--- a/source/ide/ide_methods.bas
+++ b/source/ide/ide_methods.bas
@@ -8271,7 +8271,7 @@ SUB ideshowtext
                         END IF
                     END IF
 
-                    FindInclude = INSTR(a2$, "$INCLUDE")
+                    FindInclude = _INSTRREV(a2$, "$INCLUDE")
                     IF FindInclude > 0 THEN
                         link_idecx = LEN(a$)
                         FindApostrophe1 = INSTR(FindInclude + 8, a2$, "'")