renderPaneOn (Borges::GeeWeb)

    # File lib/Borges/Component/GeeWeb.rb, line 99
      def renderPaneOn(r)
        stream = self.text.readStream
        until stream.atEnd do
          r.attributeAt_put('valign', 'top')
          r.table_row do
            r.attributeAt_put('width', 400)
            r.cssId('text')
            r.table_data do
              self.renderText_on(stream.upToAll('{{'), r)
            end

            r.attributeAt_put('width', 20)
            r.cssId('spacer')
            r.table_data do end

            r.cssId('components')
            r.table_data do
              self.renderComponent_on(stream.upToAll('}}'), r)
            end
          end
        end
      end