sequences: bound -> index-or-length

[factor.git] / extra / pdf / layout / layout.factor

diff --git a/extra/pdf/layout/layout.factor b/extra/pdf/layout/layout.factor
index d8b976fcef919c23a987f2cf47ef4421d2afe8bb..3f3c4a2fe371ef609b38b941467d5b233e560a1e 100644 (file)
--- a/extra/pdf/layout/layout.factor
+++ b/extra/pdf/layout/layout.factor
@@ -101,7 +101,7 @@ M: p pdf-render
     [
         over ?line-break
         over [ font>> ] [ avail-width ] bi visual-wrap
-        over avail-lines bound cut
+        over avail-lines index-or-length cut
         [ draw-text ] [ "" concat-as ] bi*
     ] change-string dup string>> empty? [ drop f ] when ;
 
@@ -134,7 +134,7 @@ M: text pdf-render
             [ { } ] [ over [ font>> ] [ width ] bi visual-wrap ]
             if-empty
         ] dip [ prefix ] when*
-        over avail-lines bound cut
+        over avail-lines index-or-length cut
         [ draw-text ] [ "" concat-as ] bi*
     ] change-string dup string>> empty? [ drop f ] when ;