diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/Tests/Readers/Org/Block/Table.hs | 7 | ||||
| -rw-r--r-- | test/command/3706.md | 19 |
2 files changed, 17 insertions, 9 deletions
diff --git a/test/Tests/Readers/Org/Block/Table.hs b/test/Tests/Readers/Org/Block/Table.hs index c8b0a1375..102623735 100644 --- a/test/Tests/Readers/Org/Block/Table.hs +++ b/test/Tests/Readers/Org/Block/Table.hs @@ -160,4 +160,11 @@ tests = [ [ plain "x", plain "6" ] , [ plain "9", plain "42" ] ] + + , "named table" =: + T.unlines [ "#+NAME: x-marks-the-spot" + , "| x |" + ] =?> + divWith ("x-marks-the-spot", mempty, mempty) + (simpleTable' 1 mempty [ [ plain "x" ] ]) ] diff --git a/test/command/3706.md b/test/command/3706.md index 5b2e32f7f..3765372fa 100644 --- a/test/command/3706.md +++ b/test/command/3706.md @@ -15,15 +15,16 @@ pandoc -f org -t native | 2 | La | | 3 | La | ^D -[Table [Span ("tab",[],[]) [],Str "Lalelu."] [AlignDefault,AlignDefault] [0.0,0.0] - [[Plain [Str "Id"]] - ,[Plain [Str "Desc"]]] - [[[Plain [Str "1"]] - ,[Plain [Str "La"]]] - ,[[Plain [Str "2"]] - ,[Plain [Str "La"]]] - ,[[Plain [Str "3"]] - ,[Plain [Str "La"]]]]] +[Div ("tab",[],[]) + [Table [Str "Lalelu."] [AlignDefault,AlignDefault] [0.0,0.0] + [[Plain [Str "Id"]] + ,[Plain [Str "Desc"]]] + [[[Plain [Str "1"]] + ,[Plain [Str "La"]]] + ,[[Plain [Str "2"]] + ,[Plain [Str "La"]]] + ,[[Plain [Str "3"]] + ,[Plain [Str "La"]]]]]] ``` ``` |