diff options
| author | Daniil Baturin <daniil@baturin.org> | 2018-05-22 21:04:49 +0700 |
|---|---|---|
| committer | Daniil Baturin <daniil@baturin.org> | 2018-05-22 21:06:35 +0700 |
| commit | c754178f2fe2e741105c5ce34029b32aad033f91 (patch) | |
| tree | a0532e90d15ebdb248a1cc230ba6fa194e561eb9 /src/vycli.ml | |
| parent | 08cc3adf5a85d1fd93ae9789e7fd1b1348095264 (diff) | |
| download | vyconf-c754178f2fe2e741105c5ce34029b32aad033f91.tar.gz vyconf-c754178f2fe2e741105c5ce34029b32aad033f91.zip | |
Remove a leftover debug print.
Diffstat (limited to 'src/vycli.ml')
| -rw-r--r-- | src/vycli.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vycli.ml b/src/vycli.ml index c2f95e7..e00a4e3 100644 --- a/src/vycli.ml +++ b/src/vycli.ml @@ -78,7 +78,7 @@ let main socket op path out_format config_format = end in match result with | Ok s -> let%lwt () = Lwt_io.write Lwt_io.stdout s in Lwt.return 0 - | Error e -> let%lwt () = Lwt_io.write Lwt_io.stderr e in Lwt.return 1 + | Error e -> let%lwt () = Lwt_io.write Lwt_io.stderr (Printf.sprintf "%s\n" e) in Lwt.return 1 let _ = let () = Arg.parse args (fun f -> ()) usage in |