render_cell_for_date_row_index_on (Borges::SelectionDateTable)

    # File lib/Borges/Component/SelectionDateTable.rb, line 41
      def render_cell_for_date_row_index_on(aDate, anObject, aNumber, r)
        r.attributeAt_put('bgcolor', (self.colorForDate_rowIndex(aDate, aNumber)))
        r.attributeAt_put('align', 'center')
        r.tableData do
          text = @cellBlock.value_value(anObject, aDate)
          r.anchorWithAction_text(proc do
            self.selectDate_rowIndex(aDate, aNumber)
          end, text)
        end
      end