From 02ecc305faedb8fdda0728e0c44672de9c01b16f Mon Sep 17 00:00:00 2001
From: Rene Vergara <rene@vergara.network>
Date: Tue, 6 Dec 2022 12:40:58 -0600
Subject: [PATCH] Fix session assignment for WooCommerce

---
 src/ZGoBackend.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/ZGoBackend.hs b/src/ZGoBackend.hs
index 897e666..0d9c01c 100644
--- a/src/ZGoBackend.hs
+++ b/src/ZGoBackend.hs
@@ -714,7 +714,9 @@ routes pipe config = do
                               ZGoOrder
                                 Nothing
                                 (oaddress o)
-                                ("WC-" <> (T.pack . show $ o_id o))
+                                (case o_id o of
+                                   Just o' -> "WC-" <> (T.pack . show $ o')
+                                   Nothing -> "")
                                 (parseTimeOrError
                                    True
                                    defaultTimeLocale