Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Now straighten out tables after the blankline changes
  • Loading branch information
castaway committed Mar 6, 2012
1 parent 7996079 commit d23fdb8
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 82 deletions.
4 changes: 2 additions & 2 deletions src/Text/Pandoc/Writers/PseudoPod.hs
Expand Up @@ -225,8 +225,8 @@ blockToPseudoPod opts (Table caption _ _ headers rows) = do
headers' <- mapM (blockListToPseudoPod opts) headers

rawRows <- mapM (mapM (blockListToPseudoPod opts)) rows
let makeRow = hcat . intersperse (text("\n=cell "))
let makeRowBlock = hcat . intersperse (text("\n=row\n\n=cell "))
let makeRow = hcat . intersperse (text("\n\n=cell "))
let makeRowBlock = hcat . intersperse (text("\n\n=row\n\n=cell "))

let rows' = map makeRow rawRows
let rows'' = makeRowBlock rows'
Expand Down
80 changes: 0 additions & 80 deletions tests/tables.pod
Expand Up @@ -10,13 +10,10 @@ Simple table with caption:

=cell Right


=cell Left


=cell Center


=cell Default

=bodyrows
Expand All @@ -25,41 +22,30 @@ Simple table with caption:

=cell 12


=cell 12


=cell 12


=cell 12


=row

=cell 123


=cell 123


=cell 123


=cell 123


=row

=cell 1


=cell 1


=cell 1


=cell 1

=end table
Expand All @@ -74,13 +60,10 @@ Simple table without caption:

=cell Right


=cell Left


=cell Center


=cell Default

=bodyrows
Expand All @@ -89,41 +72,30 @@ Simple table without caption:

=cell 12


=cell 12


=cell 12


=cell 12


=row

=cell 123


=cell 123


=cell 123


=cell 123


=row

=cell 1


=cell 1


=cell 1


=cell 1

=end table
Expand All @@ -138,13 +110,10 @@ Simple table indented two spaces:

=cell Right


=cell Left


=cell Center


=cell Default

=bodyrows
Expand All @@ -153,41 +122,30 @@ Simple table indented two spaces:

=cell 12


=cell 12


=cell 12


=cell 12


=row

=cell 123


=cell 123


=cell 123


=cell 123


=row

=cell 1


=cell 1


=cell 1


=cell 1

=end table
Expand All @@ -202,13 +160,10 @@ Multiline table with caption:

=cell Centered Header


=cell Left Aligned


=cell Right Aligned


=cell Default aligned

=bodyrows
Expand All @@ -217,27 +172,20 @@ Multiline table with caption:

=cell First


=cell row


=cell 12.0


=cell Example of a row that spans multiple lines.


=row

=cell Second


=cell row


=cell 5.0


=cell Here's another one. Note the blank line between rows.

=end table
Expand All @@ -252,13 +200,10 @@ Multiline table without caption:

=cell Centered Header


=cell Left Aligned


=cell Right Aligned


=cell Default aligned

=bodyrows
Expand All @@ -267,27 +212,20 @@ Multiline table without caption:

=cell First


=cell row


=cell 12.0


=cell Example of a row that spans multiple lines.


=row

=cell Second


=cell row


=cell 5.0


=cell Here's another one. Note the blank line between rows.

=end table
Expand All @@ -302,41 +240,30 @@ Table without column headers:

=cell 12


=cell 12


=cell 12


=cell 12


=row

=cell 123


=cell 123


=cell 123


=cell 123


=row

=cell 1


=cell 1


=cell 1


=cell 1

=end table
Expand All @@ -351,27 +278,20 @@ Multiline table without column headers:

=cell First


=cell row


=cell 12.0


=cell Example of a row that spans multiple lines.


=row

=cell Second


=cell row


=cell 5.0


=cell Here's another one. Note the blank line between rows.

=end table

0 comments on commit d23fdb8

Please sign in to comment.