Transaq: fix cancel order command

12 months ago · 4fe9996ce2
1 changed files with 1 additions and 1 deletions
--- a/src/Transaq.hs
+++ b/src/Transaq.hs
@ -343,7 +343,7 @@ newtype CommandCancelOrder =
				@@ -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 =