diff options
| author | Olivier Blin <oblin@mandriva.com> | 2008-03-10 19:47:03 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2008-03-10 19:47:03 +0000 |
| commit | dfcd26748314190d6186dba81b9b1d8d1cfada67 (patch) | |
| tree | 9c358cc624f556751e9d937ebff664a9cb67456f | |
| parent | 9a4cc25764811e40b4f4f2baee47ceea3382ed7e (diff) | |
| download | perl_checker-dfcd26748314190d6186dba81b9b1d8d1cfada67.tar perl_checker-dfcd26748314190d6186dba81b9b1d8d1cfada67.tar.gz perl_checker-dfcd26748314190d6186dba81b9b1d8d1cfada67.tar.bz2 perl_checker-dfcd26748314190d6186dba81b9b1d8d1cfada67.tar.xz perl_checker-dfcd26748314190d6186dba81b9b1d8d1cfada67.zip | |
add support for Basedir ../../..
| -rw-r--r-- | src/config_file.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/config_file.ml b/src/config_file.ml index efb6fb3..69c47db 100644 --- a/src/config_file.ml +++ b/src/config_file.ml @@ -21,6 +21,7 @@ let read dir = match words line with | [ "Basedir"; ".." ] -> { basedir = Some 1 } | [ "Basedir"; "../.." ] -> { basedir = Some 2 } + | [ "Basedir"; "../../.." ] -> { basedir = Some 3 } | [] -> config (* blank line *) | [ "Ignore"; pkg ] | [ pkg ] (* the deprecated form *) |