Patch title: Release 90 bulk changes
Abstract:
File: /graphic/browser/tag/header.pli
Key:
    Removed line
    Added line
module "prototype.pli"
module "/pliant/graphic/browser/xml/helper.pli"


tag_position head
  void

tag_draw head
  void


method c header_position tree size
  arg_rw XmlContext c ; arg_rw XmlTree tree ; arg Float size
  implicit c
    newline
    area_y0 += size/72*25.4
    newline
    set "font" "size" string:size
    set "b"
    position_recurse tree
    newline
    area_y0 += 0.5*size/72*25.4
    newline

method c header_draw tree size
  arg_rw XmlContext c ; arg_rw XmlTree tree ; arg Float size
  implicit c
    set "font" "size" string:size
    set "b"
    draw_recurse tree


tag_position h1
  header_position tree 24

tag_draw h1
  header_draw tree 24


tag_position h2
  header_position tree 20

tag_draw h2
  header_draw tree 20


tag_position h3
  header_position tree 16

tag_draw h3
  header_draw tree 16