fix possible range violation when allowing cursor past EOL

This commit is contained in:
Basile Burg 2019-01-07 09:20:22 +01:00
parent 905aff9f90
commit 39d9ee85d1
1 changed files with 1 additions and 1 deletions

View File

@ -2573,7 +2573,7 @@ begin
if right then
c := s[p.x]
else
c := s[p.x-1];
c := s[min(p.x-1, s.length)];
if not right then
begin
if c in w then