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

unbreak check syntax

Browse Source 
get-current-tab may not be the right tab to replay the trace,
now that online expansion runs other tabs when the current tab
is up to date.
(cherry picked from commit 3e5a9ca3cd)
This commit is contained in:
Robby Findler 2013-01-27 07:28:52 -06:00 committed by Ryan Culpepper
parent df6eb1bc39
commit 0e8ed01cde
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/drracket/private/syncheck/gui.rkt
View File

@ -1584,7 +1584,7 @@ If the namespace does not, they are colored the unbound color.
(when (set-syncheck-running-mode bx) (when (set-syncheck-running-mode bx)
;; reset any previous check syntax information ;; reset any previous check syntax information
(let ([tab (get-current-tab)]) (let ([tab (send defs-text get-tab)])
(send tab syncheck:clear-error-message) (send tab syncheck:clear-error-message)
(send tab syncheck:clear-highlighting) (send tab syncheck:clear-highlighting)
(send defs-text syncheck:reset-docs-im)) (send defs-text syncheck:reset-docs-im))