Client: fix typo 'litteral' -> 'literal'

This commit is contained in:
Guillem Rieu 2016-11-22 17:33:17 +01:00 committed by Benjamin Canou
parent a48d8c0026
commit 69adc115be
2 changed files with 4 additions and 4 deletions

View File

@ -164,8 +164,8 @@ module Alias = functor (Entity : Entity) -> struct
let source_param ?(name = "src") ?(desc = "source " ^ name) next =
let desc =
desc ^ "\n"
^ "can be an alias, file or litteral (autodetected in this order)\n\
use 'file:path', 'text:litteral' or 'alias:name' to force" in
^ "can be an alias, file or literal (autodetected in this order)\n\
use 'file:path', 'text:literal' or 'alias:name' to force" in
param ~name ~desc
(fun s ->
let read path =

View File

@ -61,8 +61,8 @@ module ContractAlias = struct
let destination_param ?(name = "dst") ?(desc = "destination contract") next =
let desc =
desc ^ "\n"
^ "can be an alias, a key alias, or a litteral (autodetected in this order)\n\
use 'text:litteral', 'alias:name', 'key:name' to force" in
^ "can be an alias, a key alias, or a literal (autodetected in this order)\n\
use 'text:literal', 'alias:name', 'key:name' to force" in
Cli_entries.param ~name ~desc
(fun s ->
match Utils.split ~limit:1 ':' s with