diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-02-08 14:38:15 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-02-08 14:38:15 +0000 |
| commit | e527cb25226d2c9037da66ec8a1832ce22c23634 (patch) | |
| tree | b36f102eb45e6b1a0bec776aa177856e10d362b4 /toplevel | |
| parent | 6b2d99445d35ea71cd24becb7f936e0cc9779d46 (diff) | |
Suppression warning no .coqrc
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1356 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel')
| -rw-r--r-- | toplevel/coqinit.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/toplevel/coqinit.ml b/toplevel/coqinit.ml index da86562f0..3cc0bd5f4 100644 --- a/toplevel/coqinit.ml +++ b/toplevel/coqinit.ml @@ -30,10 +30,12 @@ let load_rcfile() = Vernac.load_vernac false (!rcfile^"."^Coq_config.version) else if file_readable_p !rcfile then Vernac.load_vernac false !rcfile - else + else () +(* if Options.is_verbose() then mSGNL [< 'sTR ("No .coqrc or .coqrc."^Coq_config.version^ " found. Skipping rcfile loading.") >] +*) with e -> (mSGNL [< 'sTR"Load of rcfile failed." >]; raise e) |