Removed Blank block element as unnecessary.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@578 788f1e2b-df1e-0410-8736-df70ead52e1b

1 files changed, 0 insertions, 7 deletions

diff --git a/src/Text/ParserCombinators/Pandoc.hs b/src/Text/ParserCombinators/Pandoc.hs
index ced0cb7ca..5b1742975 100644
--- a/src/Text/ParserCombinators/Pandoc.hs
+++ b/src/Text/ParserCombinators/Pandoc.hs
@@ -38,7 +38,6 @@ module Text.ParserCombinators.Pandoc (
                                       blanklines,
                                       escaped,
                                       enclosed,
-                                      blankBlock,
                                       nullBlock,
                                       stringAnyCase,
                                       parseFromStr
@@ -59,12 +58,6 @@ nullBlock = do
   anyChar 
   return Null
 
--- | Parses one or more blank lines; returns 'Blank'.
-blankBlock :: GenParser Char st Block
-blankBlock = do
-  blanklines
-  return Blank
-
 -- | Parses a space or tab.
 spaceChar :: CharParser st Char
 spaceChar = oneOf " \t"