missed a call to do-search

2016-07-26 01:10:55 -05:00 · 2016-07-26 01:10:55 -05:00 · a8574ce5e6
commit a8574ce5e6
parent 1801eac125
1 changed files with 1 additions and 1 deletions
--- a/gui-lib/framework/private/text.rkt
+++ b/gui-lib/framework/private/text.rkt
@ -1268,7 +1268,7 @@
                (when to-replace-highlight
                  (unhighlight-replace))]
               [else
-                (define next (do-search (get-start-position) 'eof))
+                (define next (do-search (get-start-position)))
                (begin-edit-sequence #t #f)
                (cond
                  [(number? next)