suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source 
original commit: 1377763b8afdbf7c5003ea144652ab26d7c4a364
This commit is contained in:
Scott Owens 2004-10-25 06:27:54 +00:00
parent a060e05a8d
commit 02a598b9b4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/framework/private/color.ss
View File

@ -244,7 +244,7 @@
(set! invalid-tokens invalid-tree)
(set! invalid-tokens-start
(+ invalid-tokens-start tok-end change-length))))
((>= edit-start-pos current-pos)
((> edit-start-pos current-pos)
(set! invalid-tokens-start (+ change-length invalid-tokens-start)))
(else
(let-values (((tok-start tok-end valid-tree invalid-tree)