pdf.layout: change-last needs prefix due to name clash from accessors

factor-shell
Björn Lindqvist 2018-01-24 18:20:30 +01:00
parent 3b45c93ece
commit cd5a0c420d
1 changed files with 1 additions and 2 deletions

View File

@ -1,6 +1,5 @@
! Copyright (C) 2011-2012 John Benediktsson
! See http://factorcode.org/license.txt for BSD license
USING: accessors assocs calendar combinators environment fonts
formatting fry io io.streams.string kernel literals locals make
math math.order math.ranges namespaces pdf.canvas pdf.values
@ -252,7 +251,7 @@ M: table-row pdf-render
] each widths >alist sort-keys values
! make last cell larger
dup sum 400 swap [-] [ + ] curry dupd change-last
dup sum 400 swap [-] [ + ] curry dupd sequences.extras:change-last
! size down each column
dup sum dup 400 > [ 400 swap / [ * ] curry map ] [ drop ] if ;