Shared.filterIpynbOutput: 'best' should include everything for ipynb.

This commit is contained in:
John MacFarlane
2019-03-06 10:00:18 -08:00
parent 186b50e263
commit 707eef34b7
+5 -1
View File
@@ -679,7 +679,11 @@ filterIpynbOutput mode = walk go
where go (Div (ident, ("output":os), kvs) bs) =
case mode of
Nothing -> Div (ident, ("output":os), kvs) []
Just fmt -> Div (ident, ("output":os), kvs) $
-- "best" for ipynb includes all formats:
Just fmt
| fmt == Format "ipynb"
-> Div (ident, ("output":os), kvs) bs
| otherwise -> Div (ident, ("output":os), kvs) $
take 1 $ sortBy (comparing rank) bs
where
rank (RawBlock (Format "html") _)