diff options
| author | Daniil Baturin <daniil@baturin.org> | 2016-12-13 08:05:48 +0600 |
|---|---|---|
| committer | Daniil Baturin <daniil@baturin.org> | 2016-12-13 08:05:48 +0600 |
| commit | d515e5be698397612630548652bf7c146da39d6d (patch) | |
| tree | 670b7c2fb3c5e6aeb54d9500060a22bfa243ad13 /src | |
| parent | 2b1083df2a7ceb87679c5d071bb9752c0ee7a352 (diff) | |
| download | vyconf-d515e5be698397612630548652bf7c146da39d6d.tar.gz vyconf-d515e5be698397612630548652bf7c146da39d6d.zip | |
Fix a few instances of sloppy sequences (with non-unit expressions).
Diffstat (limited to 'src')
| -rw-r--r-- | src/vyconfd.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vyconfd.ml b/src/vyconfd.ml index 3f80c1d..120990f 100644 --- a/src/vyconfd.ml +++ b/src/vyconfd.ml @@ -29,7 +29,8 @@ let load_config path = match result with | Result.Ok cfg -> cfg | Result.Error err -> - Lwt_log.fatal (Printf.sprintf "Could not load the configuration file %s" err); exit 1 + Lwt_log.fatal (Printf.sprintf "Could not load the configuration file %s" err) |> Lwt.ignore_result; + exit 1 let setup_logger daemonize log_file template = (* |