diff --git a/collects/drracket/private/unit.rkt b/collects/drracket/private/unit.rkt
index 00deb4df29..cc1d82c19d 100644
--- a/collects/drracket/private/unit.rkt
+++ b/collects/drracket/private/unit.rkt
@@ -2650,6 +2650,7 @@ module browser threading seems wrong.
           (send defs-copy set-style-list (send definitions-text get-style-list)) ;; speeds up the copy
           (send definitions-text copy-self-to defs-copy)
           (define text-port (open-input-text-editor defs-copy 0 'end values name #t))
+          (port-count-lines! text-port)
           (send interactions-text evaluate-from-port
                 text-port
                 #t