website/inc/html.inc

   1 <define-tag h1 whitespace=delete endtag=required>
   2 <preserve subtitle />
   3 <set-var %attributes />
   4 <h1*>%body</h1*>
   5 {#H1_FLAT#:<: $x = <<kjhasdflkjhasdf;
   6 %body
   7 kjhasdflkjhasdf
   8 $x =~ s/\\n/ /g; print $x; :>:#H1_FLAT#}
   9 <if <get-var title_is_set /> ""
  10    {#Title#:{#H1_FLAT#}:#Title#}
  11 />
  12 <restore subtitle />
  13 </define-tag>
  14
  15 <define-tag title whitespace=delete endtag=required>
  16 <set-var title_is_set=1/>
  17 {#!Title#:<: $_ = <<kjhasdflkjhasdf;
  18 %body
  19 kjhasdflkjhasdf
  20 s/\\n/ /g; print :>:#Title#}
  21 </define-tag>
  22
  23 <define-tag h2 whitespace=delete endtag=required>
  24
  25 <h2* %attributes>%body</h2*>
  26 </define-tag>
  27
  28 <define-tag h3 whitespace=delete endtag=required>
  29
  30 <h3* %attributes>%body</h3*>
  31 </define-tag>