Add new tests with syntax highlighting/include:file expectations

Author: wioux

spec/templates/helpers/html_helper_spec.rb

@@ -144,6 +144,30 @@ def options
       expect(htmlify("test {include:file:foo.rdoc}", :rdoc).gsub(/[\r?\n]+/, '')).to eq '<p>test HI</p>'
     end
 
+    it "preserves syntax highlighting in {include:} snippets" do
+      load_markup_provider(:rdoc)
+      expect(File).to receive(:file?).with('foo.rdoc').and_return(true)
+      expect(File).to receive(:read).with('foo.rdoc').and_return(
+                        " !!!ruby\n x = 1\n"
+                      )
+      expect(htmlify("{include:file:foo.rdoc}", :rdoc).gsub(/[\r?\n]+/, '')).
+        not_to include("&lt;")
+    end
+
+    it "escapes {include:} html snippets only once" do
+      expect(self).to receive(:html_syntax_highlight_html) do |source|
+        %(<strong>#{CGI.escapeHTML(source)}</strong>)
+      end.at_least(:once)
+
+      load_markup_provider(:rdoc)
+      expect(File).to receive(:file?).with('foo.md').and_return(true)
+      expect(File).to receive(:read).with('foo.md').and_return(
+                        "    !!!html\n    <h1>\n"
+                      )
+      expect(htmlify("{include:file:foo.md}", :markdown).gsub(/[\r?\n]+/, '')).
+        to include(%(<strong>&lt;h1&gt;</strong>))
+    end
+
     it "does not autolink URLs inside of {} (markdown specific)" do
       log.enter_level(Logger::FATAL) do
         pending 'This test depends on markdown' unless markup_class(:markdown)