summaryrefslogtreecommitdiff
path: root/Pancake/Printing.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Pancake/Printing.hs')
-rw-r--r--Pancake/Printing.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/Pancake/Printing.hs b/Pancake/Printing.hs
index c16e820..bace403 100644
--- a/Pancake/Printing.hs
+++ b/Pancake/Printing.hs
@@ -89,6 +89,7 @@ showSexps uri ro =
, showSexp s]
showDenotation :: Denotation -> String
showDenotation (Link u) = list ["link", ".", encodeStr $ show u]
+ showDenotation (Image u) = list ["image", ".", encodeStr $ show u]
showDenotation (Math m) = list ["math", ".", encodeStr m]
showDenotation (Heading l) = list ["heading", ".", show l]