Fix buyer/seller who were swapped in --arbitrage output

diff --git a/yarrg/commod-results-processor b/yarrg/commod-results-processor
index bb0724d0d81e0c26204152879d45f605a7b64c1e..d322c1c7b682638d14c861b573386e97d81cc279 100755 (executable)
--- a/yarrg/commod-results-processor
+++ b/yarrg/commod-results-processor
@@ -129,8 +129,8 @@ sub main__arbitrage () {
            $info.=
                sprintf("%-13.13s| %-19.19s %4d| %-19.19s %4d|%3d x%3d =%3d\n",
                       $commod,
            $info.=
                sprintf("%-13.13s| %-19.19s %4d| %-19.19s %4d|%3d x%3d =%3d\n",
                       $commod,

-                      $buys[0]{Stall},$buys[0]{Price},

                       $sells[0]{Stall},$sells[0]{Price},
                       $sells[0]{Stall},$sells[0]{Price},

+                      $buys[0]{Stall},$buys[0]{Price},

                       $qty, $pricediff, $tprofit);
            sub arb_subtract_qty (\@) {
                my ($verbs) = @_;
                       $qty, $pricediff, $tprofit);
            sub arb_subtract_qty (\@) {
                my ($verbs) = @_;