Included navbar example

This commit is contained in:
Severin Münger
2013-09-15 00:44:20 +02:00
parent 09544ba6d2
commit 9db93cf4c9
4 changed files with 40 additions and 78 deletions

View File

@@ -54,7 +54,7 @@ feature
l_attributes := l_attributes + " class=%"" + css_classes_string + "%""
end
Result := "<" + tag + " " + l_attributes
if body.is_empty and not tag.is_equal ("textarea") and not tag.is_equal ("span") and not tag.is_equal ("button") then
if body.is_empty and not tag.is_equal ("textarea") and not tag.is_equal ("span") and not tag.is_equal ("button") and not tag.is_equal ("ul") then
Result := Result + " />"
else
Result := Result + " >" + body + "</" + tag + ">"