class Rtml::Dom::ScreenElement < Rtml::Dom::Element
  def after_initialize
    super
    find_or_add_property(:next, :id_ref => true, :drop_if_blank => true)
  end

  # TML has issues with empty Screen tags
  def build_empty_tag
    build_content_tag do
      if !property('next').blank?
        property = find_property('next')
        value = property.tml_value
        "<next uri=\"#{value}\" />"
      else
        '<next uri="#assert" />'
      end
    end
  end

  def path
    if document && document.name
      "#{document.name}/#{property('id')}"
    else
      property('id').to_s
    end
  end
end