diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-12-08 23:33:33 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-12-08 23:33:33 +0000 |
| commit | edaedbc3727e42918c68c39dc270ddf86220ca8c (patch) | |
| tree | 6a6f7561d3e82140e2591eb1d81b9c070c523761 /lib/envars.ml | |
| parent | de46c3f782dd618e947e7270cd398abf1fd514c2 (diff) | |
Ensure that a function declared with a label is used with it
This correspond to ocaml4 warning 6
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16053 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/envars.ml')
| -rw-r--r-- | lib/envars.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/envars.ml b/lib/envars.ml index b6312e7d9..a4629e50d 100644 --- a/lib/envars.ml +++ b/lib/envars.ml @@ -192,9 +192,9 @@ let camlp4lib () = (** {1 XDG utilities} *) -let xdg_data_home warning = +let xdg_data_home warn = coqify - (getenv_else "XDG_DATA_HOME" (fun () -> (home warning) / ".local/share")) + (getenv_else "XDG_DATA_HOME" (fun () -> (home ~warn) / ".local/share")) let xdg_config_home warn = coqify |