We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 1207aca commit c6ba7fdCopy full SHA for c6ba7fd
lib/prompts/password.ml
@@ -35,15 +35,15 @@ let rec loop ~validate ~term ~impl:(module I : Impl.M) message =
35
Lwt.return r
36
| Error e ->
37
LTerm.fprintls term (I.make_error e) >>= fun () ->
38
- loop message ?validate ~term ~impl:(module I)
+ loop message ~validate ~term ~impl:(module I)
39
in
40
let prompt = I.make_prompt message in
41
(new read_password prompt ~term)#run >>= fun password ->
42
match Zed_string.to_utf8 password with
43
| "" ->
44
let error_str = I.make_error "You need to enter a password" in
45
LTerm.fprintls term error_str >>= fun () ->
46
47
| password ->
48
validate_input password
49
0 commit comments