renderContentOn (Borges::GeeWeb)

    # File lib/Borges/Component/GeeWeb.rb, line 44
      def renderContentOn(r)
        self.renderPageSelectorOn(r)

        r.attributes.cellpadding(10)
        r.attributes.cellspacing(0)
        r.attributes.width('90%')
        r.attributes.height('80%')

        r.table do
          self.renderPaneOn(r)

          unless @page.contents == self.allPages.last then
            r.cssId(:nav)
            r.tableRowWith do
              r.anchorWithAction_text(proc do self.nextPage end, 'next page')
            end
          end
        end

        self.renderPageSelectorOn(r)
      end