From 4fe9996ce2a3dafd99167516114f4681859a0455 Mon Sep 17 00:00:00 2001
From: Denis Tereshkin <denis@kasan.ws>
Date: Sat, 21 Dec 2024 17:04:38 +0700
Subject: [PATCH] Transaq: fix cancel order command

---
 src/Transaq.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Transaq.hs b/src/Transaq.hs
index ea1013e..9874413 100644
--- a/src/Transaq.hs
+++ b/src/Transaq.hs
@@ -343,7 +343,7 @@ newtype CommandCancelOrder =
 
 instance TransaqCommand CommandCancelOrder where
   toXml CommandCancelOrder{..} =
-    T.pack . showElement $ unode "command" ([strAttr "id" "cancelOrder"],
+    T.pack . showElement $ unode "command" ([strAttr "id" "cancelorder"],
       [ unode "transactionid" (show transactionId)])
 
 newtype CommandGetSecuritiesInfo =