diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs index bb1f5ea..62d04df 100644 --- a/src/ZGoBackend.hs +++ b/src/ZGoBackend.hs @@ -762,7 +762,7 @@ routes pipe config = do findXeroOrder (oaddress o') (xi_number xI) - (xi_shortcode xI) + (xr_shortCode invReq) case cast' . Doc =<< finalOrder of Nothing -> do