core: cramp -> bound (was short)

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

diff --git a/extra/pdf/layout/layout.factor b/extra/pdf/layout/layout.factor
index 1e76a7a23dd93810cba6037be947f4cf8715ffa7..d8b976fcef919c23a987f2cf47ef4421d2afe8bb 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 cramp cut
+        over avail-lines bound 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 cramp cut
+        over avail-lines bound cut
         [ draw-text ] [ "" concat-as ] bi*
     ] change-string dup string>> empty? [ drop f ] when ;