1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-03 08:51:22 +00:00

Fixes getWordAtCursor$ crashing at contiguous spaces.

This commit is contained in:
Fellippe Heitor 2021-02-12 23:05:32 -03:00
parent ee99486c01
commit 0a79540ce5

View file

@ -14632,6 +14632,7 @@ FUNCTION getWordAtCursor$
a2$ = MID$(a$, x1, x2 - x1 + 1)
ELSE
symbol$ = CHR$(ASC(a$, x))
IF symbol$ = CHR$(32) THEN EXIT FUNCTION
IF symbol$ = "~" THEN getWordAtCursor$ = "~": EXIT FUNCTION
IF symbol$ = "`" THEN getWordAtCursor$ = "`": EXIT FUNCTION
IF symbol$ = "%" AND MID$(a$, x + 1) = "&" THEN getWordAtCursor$ = "%&": EXIT FUNCTION