diff options
Diffstat (limited to 'src/config_file.ml')
| -rw-r--r-- | src/config_file.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/config_file.ml b/src/config_file.ml index a5ee94f..efb6fb3 100644 --- a/src/config_file.ml +++ b/src/config_file.ml @@ -19,8 +19,8 @@ let read dir = let config = fold_lines (fun config line -> match words line with - | [ "Basedir"; ".." ] -> { config with basedir = Some 1 } - | [ "Basedir"; "../.." ] -> { config with basedir = Some 2 } + | [ "Basedir"; ".." ] -> { basedir = Some 1 } + | [ "Basedir"; "../.." ] -> { basedir = Some 2 } | [] -> config (* blank line *) | [ "Ignore"; pkg ] | [ pkg ] (* the deprecated form *) |