diff --git a/basis/ui/gadgets/editors/editors.factor b/basis/ui/gadgets/editors/editors.factor
index e262ac7fea..72d5900c28 100755
--- a/basis/ui/gadgets/editors/editors.factor
+++ b/basis/ui/gadgets/editors/editors.factor
@@ -235,10 +235,11 @@ M: editor ungraft*
     editor get selection-color>> gl-color
     editor get selection-start/end
     over first [
-        2dup [
+        2dup '[
+            [ _ _ ] dip
             draw-selected-line
             1 translate-lines
-        ] with with each-line
+        ] each-line
     ] with-editor-translation ;
 
 M: editor draw-gadget*