doc/site.conf

   1 # -*- perl -*-
   2
   3 $DO_CONTENTS = 0;
   4 $DO_SCONTENTS = 0;
   5 $PREFIX = geiser;
   6 $NODE_FILES = 0;
   7 $SEPARATED_FOOTNOTES = 0;
   8
   9 @MISC_BUTTONS = ();
  10 @CHAPTER_BUTTONS = ('FastBack', 'FastForward', 'Top');
  11
  12 $USER = 'jao';
  13 $DATE = '';
  14
  15 $CSS_LINES = '<link rel="stylesheet" type="text/css" href="./geiser.css">';
  16
  17 $print_page_foot = \&page_foot;
  18 $print_chapter_footer = \&chap_footer;
  19 $print_chapter_header = \&chap_header;
  20
  21 sub page_foot($) {
  22     my $h = shift;
  23     print $h "</body>";
  24 }
  25
  26 sub button_link {
  27     my $label = shift;
  28     my $txt = shift;
  29     my $trail = shift;
  30    '<a class="navlink" href="' . $Texi2HTML::HREF{$label} . '">'
  31        . $txt . '</a>' . $trail;
  32 }
  33
  34 $jao_navigation_links = '';
  35
  36 sub chap_header {
  37     my $fh = shift;
  38     $jao_navigation_links = nav_links();
  39     print $fh "<hr>";
  40 }
  41
  42 sub chap_footer {
  43     my $fh = shift;
  44     print $fh $jao_navigation_links;
  45 }
  46
  47 sub nav_links {
  48     '<div class="navigation"><table border="0"><tr><td align="left">'
  49         . button_link('Top', 'Geiser', '</td><td align="right">')
  50         . button_link('FastBack', '<', '&nbsp;&nbsp;')
  51         . button_link('FastForward', '>', '</td></tr></table></div>');
  52 }
  53
  54 1;
  55