Untitled

class String
  def >>(str)
    str[0,0] = self
  end
end

class BlankSlate
  instance_methods.each { |m| undef_method m unless m =~ /^__/ or m =~ /send/ }
end

class Remold < BlankSlate
  def initialize
    @cache = ''
  end

  def method_missing meth, *args, &block
    _remold_handle meth, *args, &block
  end

  def p *args, &block
    _remold_handle :p, *args, &block
  end

  def _remold_handle meth, *args, &block
    _remold_build_tag(meth, *args, &block)
  end

  # build a tag for `name`, using `args` and an optional block that
  # will be yielded
  def _remold_build_tag(name, args=nil, &block)
    @cache << "<#{name}"
    if block_given?
      @cache << ( args ? args.inject(''){ |s,v| s+%{ #{v[0]}="#{v[1]}"} } : '' )
      @cache << ">"
      tmp = yield
      @cache << tmp unless @cache.include? tmp.to_s
      @cache << "</#{name}>"
    else
      @cache << args.inject(''){ |s,v| s+%{ #{v[0]}="#{v[1]}"} } if args
      @cache << ' />'
    end
    @cache
  end

  def d *args
    Kernel.p args
  end
end

class Template < Remold
  def simple
    p
  end

  def dual
    p
    br
  end

  def nested
    p {
      br
      }
  end

  def nested_and_dual
    p {
      br
      br
    }
  end

  def dual_nested
    p {
      br
    }
    p {
      br
    }
  end

  def nested_nested
    p {
      p {
      br
    }
    }
  end

  def html_preset
    html{
      head{
      title{'Hello there'}
      meta :name => 'foo', :content => 'bar'
    }
      body{
        h1{'Hello World!'}
        div(:class => 'foo'){'More world here'}
    }
    }
  end
end

require 'micro/test'

{
  :simple          => '<p />',
  :dual            => '<p /><br />',
  :nested          => '<p><br /></p>',
  :nested_and_dual => '<p><br /><br /></p>',
  :dual_nested     => '<p><br /></p><p><br /></p>',
  :nested_nested   => '<p><p><br /></p></p>',
  :html_preset     => '<html><head><title>Hello there</title><meta name="foo" content="bar" /></head><body><h1>Hello World!</h1><div class="foo">More world here</div></body></html>',
}.test do |t|
  template = Template.new
  template.send(t)
end