]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/pdf/wrap/wrap.factor
pdf.wrap: fix for wrap API change.
[factor.git] / extra / pdf / wrap / wrap.factor
index c3b03eb8232e04289dca3a842bc4f7f229557ac1..3e3d50708d33eec52e2ef2ec8a89f864b130522f 100644 (file)
@@ -39,4 +39,4 @@ PRIVATE>
 PRIVATE>
 
 : visual-wrap ( line font line-width -- lines )
-    [ string>elements ] dip dup wrap [ concat ] map ;
+    [ string>elements ] dip wrap [ concat ] map ;