Dump optimisation results too

[ypp-sc-tools.web-live.git] / yarrg / web / routetrade

diff --git a/yarrg/web/routetrade b/yarrg/web/routetrade
index fa29e6a596936a933917d21368d28e52c069cabb..9c2a5a423fdda83fe833c43ceb2ba02462df6a79 100644 (file)
--- a/yarrg/web/routetrade
+++ b/yarrg/web/routetrade
@@ -255,7 +255,8 @@ print join ' ', map { $_->{Optimal} } @flows;
 push @columns, qw(Opt_qty Opt_profit);
 
 </%perl>
-<% join ' ', @columns %>
+
+<& dumptable:literal, cols => \@columns, rows => \@flows &>
 
 % } # ========== OPTIMISATION ==========