@@ -520,7 +520,7 @@ pandocToEPUB version opts doc = do
521 let toChapters :: [Block] -> State [Int] [Chapter]
521 let toChapters :: [Block] -> State [Int] [Chapter]
522 toChapters [] = return []
522 toChapters [] = return []
523− toChapters (Div ("refs",_,_) bs@(Header 1 _ _:_) : rest) =
523+ toChapters (Div _ bs@(Header 1 _ _:_) : rest) =
524 toChapters (bs ++ rest)
524 toChapters (bs ++ rest)
525 toChapters (Header n attr@(_,classes,_) ils : bs) = do
525 toChapters (Header n attr@(_,classes,_) ils : bs) = do
526 nums <- get
526 nums <- get