fix cmd-. shortcut's call to set-position

(so it no longer sets the range to a strange thing (in some cases))
2013-08-15 09:36:32 -05:00 · 2013-08-15 09:36:32 -05:00 · 3980acef04
commit 3980acef04
parent 6b16d0b9de
1 changed files with 1 additions and 1 deletions
--- a/pkgs/drracket-pkgs/drracket/drracket/private/rep.rkt
+++ b/pkgs/drracket-pkgs/drracket/drracket/private/rep.rkt
@ -654,7 +654,7 @@ TODO
          (when (and start span)
            (let ([finish (+ start span)])
              (when (eq? source definitions-text) ;; only move set the cursor in the defs window
-                (send source set-position start span))
+                (send source set-position start start))
              (send source scroll-to-position start #f finish)))
          
          (on-highlighted-errors loc)