diff --git a/marlowe-chain-sync/marlowe-chain-sync/Options.hs b/marlowe-chain-sync/marlowe-chain-sync/Options.hs index 1d8662b1a1..ec33062b21 100644 --- a/marlowe-chain-sync/marlowe-chain-sync/Options.hs +++ b/marlowe-chain-sync/marlowe-chain-sync/Options.hs @@ -221,7 +221,7 @@ parseOptions defaultNetworkId defaultSocketPath defaultDatabaseUri defaultHost d mconcat [ O.fullDesc , O.progDescDoc $ Just description - , O.header "marlowe-chain-indexer: Chain query and sync server for the Marlowe Runtime." + , O.header "marlowe-chain-sync: Chain query and sync server for the Marlowe Runtime." ] description :: Doc ann diff --git a/marlowe-runtime/marlowe-contract/Main.hs b/marlowe-runtime/marlowe-contract/Main.hs index a65dcc802f..d799f465d1 100644 --- a/marlowe-runtime/marlowe-contract/Main.hs +++ b/marlowe-runtime/marlowe-contract/Main.hs @@ -331,7 +331,7 @@ getOptions = do mconcat [ fullDesc , progDescDoc $ Just description - , header "marlowe-tx: Transaction creation server for the Marlowe Runtime." + , header "marlowe-contract: Contract storage service for the Marlowe Runtime." ] description :: Doc ann