diff --git a/library/ui/text/editor.factor b/library/ui/text/editor.factor
index e1b6318c37..b0e19efda0 100644
--- a/library/ui/text/editor.factor
+++ b/library/ui/text/editor.factor
@@ -177,7 +177,8 @@ M: loc-monitor model-changed ( obj -- )
         selection-start/end
         over translate>selection-start
         2dup [
-            >r 2dup r> draw-selected-line 1 translate-lines
+            >r 2dup r> draw-selected-line
+            1 editor get translate-lines
         ] each-line 2drop
     ] do-matrix ;