14 lines
302 B
OCaml
14 lines
302 B
OCaml
module App_id = struct
|
|
let qualifier = "org"
|
|
|
|
let organization = "Permap"
|
|
|
|
let application = "permap"
|
|
end
|
|
|
|
module Project_dirs = Directories.Project_dirs (App_id)
|
|
|
|
let data_dir =
|
|
match Project_dirs.data_dir with
|
|
| None -> failwith "can't compute data directory"
|
|
| Some data_dir -> data_dir
|