removed extra arguments in call to highlight-range, since they were the default value (and the signature of this method is going to change)

svn: r10897
This commit is contained in:
Robby Findler 2008-07-24 11:36:54 +00:00
parent a97b4bff8a
commit a073b04c3c

View File

@ -233,7 +233,7 @@
(unless highlight-begin
(error 'format-whole-step "no highlight-begin to match highlight-end"))
(set! clear-highlight-thunks
(cons (highlight-range highlight-begin highlight-end highlight-color #f #f)
(cons (highlight-range highlight-begin highlight-end highlight-color)
clear-highlight-thunks))
(set! highlight-begin #f))))]
;; mflatt: MAJOR HACK - this setting needs to come from the language