@@ -331,7 +331,7 @@ definitionListItemToRST (label, defs) = do
331 label' <- inlineListToRST label
331 label' <- inlineListToRST label
332 contents <- liftM vcat $ mapM blockListToRST defs
332 contents <- liftM vcat $ mapM blockListToRST defs
333 tabstop <- gets $ writerTabStop . stOptions
333 tabstop <- gets $ writerTabStop . stOptions
334− return $ label' $$ nest tabstop (nestle contents <> cr)
334+ return $ nowrap label' $$ nest tabstop (nestle contents <> cr)
336-- | Format a list of lines as line block.
336-- | Format a list of lines as line block.
337linesToLineBlock :: PandocMonad m => [[Inline]] -> RST m Doc
337linesToLineBlock :: PandocMonad m => [[Inline]] -> RST m Doc