From 175cc2d44dab936e9245fbeb9cc30478359a97c7 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Mon, 20 Jun 2016 11:55:43 -0700
Subject: [PATCH] Implement RawInline and RawBlock in sample lua custom writer.

Closes #2985.
---
 data/sample.lua | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/data/sample.lua b/data/sample.lua
index 574f378cc..0c07b632a 100644
--- a/data/sample.lua
+++ b/data/sample.lua
@@ -170,6 +170,12 @@ function Span(s, attr)
   return "<span" .. attributes(attr) .. ">" .. s .. "</span>"
 end
 
+function RawInline(format, str)
+  if format == "html" then
+    return str
+  end
+end
+
 function Cite(s, cs)
   local ids = {}
   for _,cit in ipairs(cs) do
@@ -307,6 +313,12 @@ function Table(caption, aligns, widths, headers, rows)
   return table.concat(buffer,'\n')
 end
 
+function RawBlock(format, str)
+  if format == "html" then
+    return str
+  end
+end
+
 function Div(s, attr)
   return "<div" .. attributes(attr) .. ">\n" .. s .. "</div>"
 end