 <p>The <em>final</em> words <strong>are written</strong> here.</p>
     """
 
-    callback_test = fn([{status, parsed_html}]) ->
-      assert status      == :ok
-      assert parsed_html == expected_html
+    callback_test = fn([{ status, parsed_html }]) ->
+      assert status        == :ok
+      assert expected_html == parsed_html
     end
 
     Discount.to_html markdown_doc, callback_test
   end
 
 
-  test "Discount.to_html/2 compiles a list of Markdown documents to HTML" do
+  test "Discount.to_html/2 compiles a list of Markdown documents" do
 
     markdown_list = [
       "# test A",
-      "## test B",
+      "## test B with 'single quotes' and \"double quotes\"",
       "```elixir\ntest C\n```",
       "test `D`\n---",
       "> *test* __E__"


    expected_list = [
      {:ok, "<h1>test A</h1>\n"},
      {:ok, "<h2>test B</h2>\n"},
      {:ok, "<pre><code class=\"elixir\">test C\n</code></pre>\n"},
      {:ok, "<h2>test <code>D</code></h2>\n"},
      {:ok, "<blockquote><p><em>test</em> <strong>E</strong></p></blockquote>\n"}
    ]

    callback_test = fn(parsed_list) ->
      assert parsed_list == expected_list
    end

    Discount.to_html markdown_list, callback_test

defmodule DiscountTest do
  use ExUnit.Case

  test "Discount.to_html/2 compiles a single Markdown text to HTML" do

    markdown_doc = """
# First-level header
