Fixed warning.
commit93e096fe1d23bf60a7ca7fa39fa6e730336338eb
authorJohn MacFarlane <jgm@berkeley.edu>
dateThu 18 Jul 2013, 21:51 (13 years ago)
parent7c980f3
src/Text/Pandoc/Writers/EPUB.hs+1−1
@@ -126,7 +126,7 @@ writeEPUB opts doc@(Pandoc meta _) = do
126126 let readPicEntry entries (oldsrc, newsrc) = do
127127 res <- fetchItem sourceDir oldsrc
128128 case res of
129− Left e -> do
129+ Left _ -> do
130130 warn $ "Could not find image `" ++ oldsrc ++ "', skipping..."
131131 return entries
132132 Right (img,_) -> return $