From d15e4f744c2e3e3cdfaccf4635fffda10ebdfefa Mon Sep 17 00:00:00 2001 From: Peter Verthez Date: Thu, 12 Sep 2002 17:39:38 +0000 Subject: [PATCH] Show which CVS element is used to generate the HTML file. Add some HTML headers. --- doc/make_gom_xref | 50 +++++++++++++++++++++++++++++++---------------- 1 file changed, 33 insertions(+), 17 deletions(-) diff --git a/doc/make_gom_xref b/doc/make_gom_xref index fac7ebd..58dd035 100755 --- a/doc/make_gom_xref +++ b/doc/make_gom_xref @@ -8,6 +8,7 @@ use diagnostics; my $inputfile ="$ENV{srcdir}/../include/gom.h"; my $outputfile ="gomxref.html"; my $ext_link = "interface.html"; +my $generated = ""; my $main_structs = ""; my $sub_structs=""; @@ -22,6 +23,7 @@ while () $section = "sub" if m|/\* Sub-structures \*/|; $section = "main" if m|/\* Main structures \*/|; $section = "" if m|/\* Functions \*/|; + $generated = $1 if m|/\* \$Id$ \*/|; next if m|/\*|; if ($section ne "") { @@ -49,26 +51,40 @@ while () } } -print OUTPUT "

Gedcom object model in C

\n"; -print OUTPUT < + + + Gedcom object model in C + + + +

Gedcom object model in C

This page provides a cross-reference of all objects in the Gedcom object model for C. The following links are fast links to the main structures in the Gedcom object model: -END_OF_TEXT -print OUTPUT "\n"; -print OUTPUT "

\n"; -print OUTPUT $index; -print OUTPUT "\n"; -print OUTPUT "

\n"; -print OUTPUT "

Main structures

\n"; -print OUTPUT "

\n";
-print OUTPUT $main_structs;
-print OUTPUT "

\n"; -print OUTPUT "

Sub-structures

\n"; -print OUTPUT "

\n";
-print OUTPUT $sub_structs;
-print OUTPUT "

\n"; +

+$index + +

+ +

Main structures

+$main_structs
+

+ +

Sub-structures

+$sub_structs
+

+ +Generated from: $generated + + +END_OF_HTML + close OUTPUT; close INPUT; -- 2.30.2