diff options
| author | notin | 2009-04-24 18:28:56 +0000 |
|---|---|---|
| committer | notin | 2009-04-24 18:28:56 +0000 |
| commit | 6e1041ad146ab3cf90cfdfad237ee1f6816a3db6 (patch) | |
| tree | bfd088cda16b5b460d2f16471c90bd811bc99618 /tools | |
| parent | ac4ba8bbc899c3d3db1f1f5e0592ee419ed92994 (diff) | |
Report de la révision #12104 (Maj lien site web de Coq)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12105 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/coqdoc/cdglobals.ml | 2 | ||||
| -rw-r--r-- | tools/coqdoc/main.ml | 2 | ||||
| -rw-r--r-- | tools/coqdoc/output.ml | 4 |
3 files changed, 3 insertions, 5 deletions
diff --git a/tools/coqdoc/cdglobals.ml b/tools/coqdoc/cdglobals.ml index c81dcec179..b3f0739d19 100644 --- a/tools/coqdoc/cdglobals.ml +++ b/tools/coqdoc/cdglobals.ml @@ -54,7 +54,7 @@ let toc = ref false let page_title = ref "" let title = ref "" let externals = ref true -let coqlib = ref "http://coq.inria.fr/library/" +let coqlib = ref Coq_config.wwwstdlib let coqlib_path = ref Coq_config.coqlib let raw_comments = ref false let parse_comments = ref false diff --git a/tools/coqdoc/main.ml b/tools/coqdoc/main.ml index bbfd93fd44..da65466ddf 100644 --- a/tools/coqdoc/main.ml +++ b/tools/coqdoc/main.ml @@ -56,7 +56,7 @@ let usage () = prerr_endline " --verbose verbose mode"; prerr_endline " --no-externals no links to Coq standard library"; prerr_endline " --coqlib <url> set URL for Coq standard library"; - prerr_endline " (default is http://coq.inria.fr/library/)"; + prerr_endline (" (default is " ^ Coq_config.wwwstdlib ^ ")"); prerr_endline " --boot run in boot mode"; prerr_endline " --coqlib_path <dir> set the path where Coq files are installed"; prerr_endline " -R <dir> <coqdir> map physical dir to Coq dir"; diff --git a/tools/coqdoc/output.ml b/tools/coqdoc/output.ml index 86f3bda7e5..9fda0d0cad 100644 --- a/tools/coqdoc/output.ml +++ b/tools/coqdoc/output.ml @@ -395,8 +395,6 @@ module Html = struct printf "<div id=\"main\">\n\n" end - let self = "http://coq.inria.fr" - let trailer () = if !index && !current_module <> "Index" then printf "</div>\n\n<div id=\"footer\">\n<hr/><a href=\"index.html\">Index</a>"; @@ -412,7 +410,7 @@ module Html = struct else begin printf "<hr/>This page has been generated by "; - printf "<a href=\"%s\">coqdoc</a>\n" self; + printf "<a href=\"%s\">coqdoc</a>\n" Coq_config.wwwcoq; printf "</div>\n\n</div>\n\n</body>\n</html>" end |