diff options
| author | Daniil Baturin <daniil@baturin.org> | 2015-09-24 18:07:07 +0600 |
|---|---|---|
| committer | Daniil Baturin <daniil@baturin.org> | 2015-09-24 18:07:07 +0600 |
| commit | 7ec843fc23f0ad28c692dd3b0c64cef37a79c5bb (patch) | |
| tree | 0b10653cabd51ebb3a9ea3f5b70d2a918996f992 | |
| parent | e04a85dd4493a4ce39bdbbc4f1c3ac6caf555e4e (diff) | |
| download | vyconf-7ec843fc23f0ad28c692dd3b0c64cef37a79c5bb.tar.gz vyconf-7ec843fc23f0ad28c692dd3b0c64cef37a79c5bb.zip | |
Add a module for various defaults.
| -rw-r--r-- | src/defaults.ml | 7 | ||||
| -rw-r--r-- | src/defaults.mli | 5 | ||||
| -rw-r--r-- | src/vyconfd.ml | 4 |
3 files changed, 16 insertions, 0 deletions
diff --git a/src/defaults.ml b/src/defaults.ml new file mode 100644 index 0000000..7bf46a8 --- /dev/null +++ b/src/defaults.ml @@ -0,0 +1,7 @@ +type vyconf_defaults = { + config_file: string; +} + +let defaults = { + config_file = "/etc/vyconfd.conf"; +} diff --git a/src/defaults.mli b/src/defaults.mli new file mode 100644 index 0000000..48e5cdb --- /dev/null +++ b/src/defaults.mli @@ -0,0 +1,5 @@ +type vyconf_defaults = { + config_file: string; +} + +val defaults : vyconf_defaults diff --git a/src/vyconfd.ml b/src/vyconfd.ml index 87eb657..4a5cd5d 100644 --- a/src/vyconfd.ml +++ b/src/vyconfd.ml @@ -1 +1,5 @@ +open Defaults + +let config = Vyconf_config.load defaults.config_file + let () = print_endline "This is VyConf. Or, rather, will be." |