diff --git a/lib/hamlit/template.rb b/lib/hamlit/template.rb index 7a7d75df..ab9fa98a 100644 --- a/lib/hamlit/template.rb +++ b/lib/hamlit/template.rb @@ -8,6 +8,7 @@ module Hamlit register_as: :haml, escape_html: true, streaming: true, + ugly: true, ) end end diff --git a/spec/haml-spec/Rakefile b/spec/haml-spec/Rakefile index 03001c58..85a2b9be 100644 --- a/spec/haml-spec/Rakefile +++ b/spec/haml-spec/Rakefile @@ -1,15 +1,39 @@ $:.unshift File.expand_path('../../../lib', __FILE__) require 'json' +require 'unindent' + +def generate_spec(test, locals, options) + <<-SPEC + specify \"#{test[:name]}\" do + haml = %q{#{test[:haml]}} + locals = #{locals} + options = #{options} + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) + end + SPEC +end desc 'Convert tests.json into rspec tests' task :convert do - spec = "describe 'haml-spec' do\n" - spec += " def assert_render(html, haml, locals, options)\n" - spec += " engine = Hamlit::Template.new(options) { haml }\n" - spec += " result = engine.render(Object.new, locals)\n" - spec += " expect(result.strip).to eq(html)\n" - spec += " end\n\n" + spec = <<-SPEC.unindent + require "haml" + + describe "haml-spec" do + def assert_pretty(haml, locals, options) + engine = Haml::Engine.new(haml, options) + hamlit = Hamlit::Template.new(options) { haml } + expect(engine.render(Object.new, locals).strip).to eq(hamlit.render(Object.new, locals)) + end + + def assert_ugly(haml, locals, options) + engine = Haml::Engine.new(haml, { ugly: true }.merge(options)) + hamlit = Hamlit::Template.new({ ugly: true }.merge(options)) { haml } + expect(engine.render(Object.new, locals)).to eq(hamlit.render(Object.new, locals)) + end + + SPEC contexts = JSON.parse(File.read(File.expand_path('../../../haml-spec/tests.json', __FILE__))) contexts.each_with_index do |context, index| @@ -32,13 +56,7 @@ task :convert do options = Hash[(test[:config] || {}).map {|x, y| [x.to_sym, y]}] options[:format] = options[:format].to_sym if options[:format] - spec = " specify \"#{test[:name]}\" do\n" - spec += " html = %q{#{test[:html]}}\n" - spec += " haml = %q{#{test[:haml]}}\n" - spec += " locals = #{locals}\n" - spec += " options = #{options}\n" - spec += " assert_render(html, haml, locals, options)\n" - spec += " end\n" + generate_spec(test, locals, options) }.join("\n") spec += " end\n" end diff --git a/spec/haml-spec/ruby_haml_spec.rb b/spec/haml-spec/ruby_haml_spec.rb index 42a6c96b..ccf264ab 100644 --- a/spec/haml-spec/ruby_haml_spec.rb +++ b/spec/haml-spec/ruby_haml_spec.rb @@ -1,896 +1,857 @@ -describe 'haml-spec' do - def assert_render(html, haml, locals, options) - engine = Hamlit::Template.new(options) { haml } - result = engine.render(Object.new, locals) - expect(result.strip).to eq(html) +require "haml" + +describe "haml-spec" do + def assert_pretty(haml, locals, options) + engine = Haml::Engine.new(haml, options) + hamlit = Hamlit::Template.new(options) { haml } + expect(engine.render(Object.new, locals).strip).to eq(hamlit.render(Object.new, locals)) + end + + def assert_ugly(haml, locals, options) + engine = Haml::Engine.new(haml, { ugly: true }.merge(options)) + hamlit = Hamlit::Template.new({ ugly: true }.merge(options)) { haml } + expect(engine.render(Object.new, locals)).to eq(hamlit.render(Object.new, locals)) end context "headers" do specify "an XHTML XML prolog" do - html = %q{} haml = %q{!!! XML} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an XHTML default (transitional) doctype" do - html = %q{} haml = %q{!!!} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an XHTML 1.1 doctype" do - html = %q{} haml = %q{!!! 1.1} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an XHTML 1.2 mobile doctype" do - html = %q{} haml = %q{!!! mobile} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an XHTML 1.1 basic doctype" do - html = %q{} haml = %q{!!! basic} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an XHTML 1.0 frameset doctype" do - html = %q{} haml = %q{!!! frameset} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an HTML 5 doctype with XHTML syntax" do - html = %q{} haml = %q{!!! 5} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an HTML 5 XML prolog (silent)" do - html = %q{} haml = %q{!!! XML} locals = {} options = {:format=>:html5} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an HTML 5 doctype" do - html = %q{} haml = %q{!!!} locals = {} options = {:format=>:html5} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an HTML 4 XML prolog (silent)" do - html = %q{} haml = %q{!!! XML} locals = {} options = {:format=>:html4} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an HTML 4 default (transitional) doctype" do - html = %q{} haml = %q{!!!} locals = {} options = {:format=>:html4} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an HTML 4 frameset doctype" do - html = %q{} haml = %q{!!! frameset} locals = {} options = {:format=>:html4} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an HTML 4 strict doctype" do - html = %q{} haml = %q{!!! strict} locals = {} options = {:format=>:html4} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "basic Haml tags and CSS" do specify "a simple Haml tag" do - html = %q{

} haml = %q{%p} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a self-closing tag (XHTML)" do - html = %q{} haml = %q{%meta} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a self-closing tag (HTML4)" do - html = %q{} haml = %q{%meta} locals = {} options = {:format=>:html4} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a self-closing tag (HTML5)" do - html = %q{} haml = %q{%meta} locals = {} options = {:format=>:html5} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a self-closing tag ('/' modifier + XHTML)" do - html = %q{} haml = %q{%zzz/} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a self-closing tag ('/' modifier + HTML5)" do - html = %q{} haml = %q{%zzz/} locals = {} options = {:format=>:html5} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with a CSS class" do - html = %q{

} haml = %q{%p.class1} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with multiple CSS classes" do - html = %q{

} haml = %q{%p.class1.class2} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with a CSS id" do - html = %q{

} haml = %q{%p#id1} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with multiple CSS id's" do - html = %q{

} haml = %q{%p#id1#id2} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with a class followed by an id" do - html = %q{

} haml = %q{%p.class1#id1} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with an id followed by a class" do - html = %q{

} haml = %q{%p#id1.class1} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an implicit div with a CSS id" do - html = %q{
} haml = %q{#id1} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "an implicit div with a CSS class" do - html = %q{
} haml = %q{.class1} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "multiple simple Haml tags" do - html = %q{
-
-

-
-
} haml = %q{%div %div %p} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "tags with unusual HTML characters" do specify "a tag with colons" do - html = %q{} haml = %q{%ns:tag} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with underscores" do - html = %q{} haml = %q{%snake_case} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with dashes" do - html = %q{} haml = %q{%dashed-tag} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with camelCase" do - html = %q{} haml = %q{%camelCase} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with PascalCase" do - html = %q{} haml = %q{%PascalCase} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "tags with unusual CSS identifiers" do specify "an all-numeric class" do - html = %q{
} haml = %q{.123} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a class with underscores" do - html = %q{
} haml = %q{.__} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a class with dashes" do - html = %q{
} haml = %q{.--} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "tags with inline content" do specify "Inline content simple tag" do - html = %q{

hello

} haml = %q{%p hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Inline content tag with CSS" do - html = %q{

hello

} haml = %q{%p.class1 hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Inline content multiple simple tags" do - html = %q{
-
-

text

-
-
} haml = %q{%div %div %p text} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "tags with nested content" do specify "Nested content simple tag" do - html = %q{

- hello -

} haml = %q{%p hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Nested content tag with CSS" do - html = %q{

- hello -

} haml = %q{%p.class1 hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Nested content multiple simple tags" do - html = %q{
-
-

- text -

-
-
} haml = %q{%div %div %p text} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "tags with HTML-style attributes" do specify "HTML-style one attribute" do - html = %q{

} haml = %q{%p(a='b')} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style multiple attributes" do - html = %q{

} haml = %q{%p(a='b' c='d')} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style attributes separated with newlines" do - html = %q{

} haml = %q{%p(a='b' c='d')} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style interpolated attribute" do - html = %q{

} haml = %q{%p(a="#{var}")} locals = {:var=>"value"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style 'class' as an attribute" do - html = %q{

} haml = %q{%p(class='class1')} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style tag with a CSS class and 'class' as an attribute" do - html = %q{

} haml = %q{%p.class2(class='class1')} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style tag with 'id' as an attribute" do - html = %q{

} haml = %q{%p(id='1')} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style tag with a CSS id and 'id' as an attribute" do - html = %q{

} haml = %q{%p#id(id='1')} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style tag with a variable attribute" do - html = %q{

} haml = %q{%p(class=var)} locals = {:var=>"hello"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style tag with a CSS class and 'class' as a variable attribute" do - html = %q{
} haml = %q{.hello(class=var)} locals = {:var=>"world"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "HTML-style tag multiple CSS classes (sorted correctly)" do - html = %q{
} haml = %q{.z(class=var)} locals = {:var=>"a"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "tags with Ruby-style attributes" do specify "Ruby-style one attribute" do - html = %q{

} haml = %q{%p{:a => 'b'}} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style attributes hash with whitespace" do - html = %q{

} haml = %q{%p{ :a => 'b' }} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style interpolated attribute" do - html = %q{

} haml = %q{%p{:a =>"#{var}"}} locals = {:var=>"value"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style multiple attributes" do - html = %q{

} haml = %q{%p{ :a => 'b', 'c' => 'd' }} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style attributes separated with newlines" do - html = %q{

} haml = %q{%p{ :a => 'b', 'c' => 'd' }} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style 'class' as an attribute" do - html = %q{

} haml = %q{%p{:class => 'class1'}} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style tag with a CSS class and 'class' as an attribute" do - html = %q{

} haml = %q{%p.class2{:class => 'class1'}} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style tag with 'id' as an attribute" do - html = %q{

} haml = %q{%p{:id => '1'}} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style tag with a CSS id and 'id' as an attribute" do - html = %q{

} haml = %q{%p#id{:id => '1'}} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style tag with a CSS id and a numeric 'id' as an attribute" do - html = %q{

} haml = %q{%p#id{:id => 1}} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style tag with a variable attribute" do - html = %q{

} haml = %q{%p{:class => var}} locals = {:var=>"hello"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style tag with a CSS class and 'class' as a variable attribute" do - html = %q{
} haml = %q{.hello{:class => var}} locals = {:var=>"world"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "Ruby-style tag multiple CSS classes (sorted correctly)" do - html = %q{
} haml = %q{.z{:class => var}} locals = {:var=>"a"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "silent comments" do specify "an inline silent comment" do - html = %q{} haml = %q{-# hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a nested silent comment" do - html = %q{} haml = %q{-# hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a multiply nested silent comment" do - html = %q{} haml = %q{-# %div foo} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a multiply nested silent comment with inconsistent indents" do - html = %q{} haml = %q{-# %div foo} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "markup comments" do specify "an inline markup comment" do - html = %q{} haml = %q{/ comment} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a nested markup comment" do - html = %q{} haml = %q{/ comment comment2} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "conditional comments" do specify "a conditional comment" do - html = %q{} haml = %q{/[if IE] %p a} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "internal filters" do specify "content in an 'escaped' filter" do - html = %q{<&">} haml = %q{:escaped <&">} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "content in a 'preserve' filter" do - html = %q{hello -

} haml = %q{:preserve hello %p} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "content in a 'plain' filter" do - html = %q{hello -

} haml = %q{:plain hello %p} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "content in a 'css' filter (XHTML)" do - html = %q{ -

} haml = %q{:css hello %p} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "content in a 'javascript' filter (XHTML)" do - html = %q{ -

} haml = %q{:javascript a(); %p} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "content in a 'css' filter (HTML)" do - html = %q{ -

} haml = %q{:css hello %p} locals = {} options = {:format=>:html5} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "content in a 'javascript' filter (HTML)" do - html = %q{ -

} haml = %q{:javascript a(); %p} locals = {} options = {:format=>:html5} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "Ruby-style interpolation" do specify "interpolation inside inline content" do - html = %q{

value

} haml = %q{%p #{var}} locals = {:var=>"value"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "no interpolation when escaped" do - html = %q{

#{var}

} haml = %q{%p \#{var}} locals = {:var=>"value"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "interpolation when the escape character is escaped" do - html = %q{

\value

} haml = %q{%p \\#{var}} locals = {:var=>"value"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "interpolation inside filtered content" do - html = %q{value interpolated: value} haml = %q{:plain #{var} interpolated: #{var}} locals = {:var=>"value"} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "HTML escaping" do specify "code following '&='" do - html = %q{<"&>} haml = %q{&= '<"&>'} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "code following '=' when escape_haml is set to true" do - html = %q{<"&>} haml = %q{= '<"&>'} locals = {} options = {:escape_html=>"true"} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "code following '!=' when escape_haml is set to true" do - html = %q{<"&>} haml = %q{!= '<"&>'} locals = {} options = {:escape_html=>"true"} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "boolean attributes" do specify "boolean attribute with XHTML" do - html = %q{} haml = %q{%input(checked=true)} locals = {} options = {:format=>:xhtml} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "boolean attribute with HTML" do - html = %q{} haml = %q{%input(checked=true)} locals = {} options = {:format=>:html5} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "whitespace preservation" do specify "following the '~' operator" do - html = %q{Foo -
Bar
Baz
} haml = %q{~ "Foo\n
Bar\nBaz
"} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "inside a textarea tag" do - html = %q{} haml = %q{%textarea hello hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "inside a pre tag" do - html = %q{
hello
-hello
} haml = %q{%pre hello hello} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end context "whitespace removal" do specify "a tag with '>' appended and inline content" do - html = %q{
  • hello
  • world
  • again
    • } haml = %q{%li hello %li> world %li again} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with '>' appended and nested content" do - html = %q{
  • hello
  • - world -
  • again
    • } haml = %q{%li hello %li> world %li again} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end specify "a tag with '<' appended" do - html = %q{

    hello -world

    } haml = %q{%p< hello world} locals = {} options = {} - assert_render(html, haml, locals, options) + assert_pretty(haml, locals, options) + assert_ugly(haml, locals, options) end end end