@@ -160,7 +160,7 @@ blockToOrg (Para [Image attr txt (src,'f':'i':'g':':':tit)]) = do
160 then return empty
160 then return empty
161 else ("#+CAPTION: " <>) `fmap` inlineListToOrg txt
161 else ("#+CAPTION: " <>) `fmap` inlineListToOrg txt
162 img <- inlineToOrg (Image attr txt (src,tit))
162 img <- inlineToOrg (Image attr txt (src,tit))
163− return $ capt $$ img
163+ return $ capt $$ img $$ blankline
164blockToOrg (Para inlines) = do
164blockToOrg (Para inlines) = do
165 contents <- inlineListToOrg inlines
165 contents <- inlineListToOrg inlines
166 return $ contents <> blankline
166 return $ contents <> blankline