# File lib/Borges/Report/TableReport.rb, line 58
  def render_header_for_column_on(aColumn, r)
    r.tableHeading do
      if aColumn.canSort then
        r.anchorWithAction_text(proc do self.sortColumn(aColumn) end,
        aColumn.title)
      else
        r.text(aColumn.title)
      end
    end
  end