summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2013-03-01 12:17:49 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2013-03-01 12:17:49 -0800
commit6611ec399c0e32cc4890c5aa058f1dd25f22b9e8 (patch)
tree752a24d12600f9b1e74826d05a333a11e38d23e2 /src/Text/Pandoc/Writers
parent649608d3241eb2222502b9610a8c86fbfe282e9a (diff)
Textile writer: Removed an unused assignment.
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r--src/Text/Pandoc/Writers/Textile.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Textile.hs b/src/Text/Pandoc/Writers/Textile.hs
index a3f899159..6a3f2fea5 100644
--- a/src/Text/Pandoc/Writers/Textile.hs
+++ b/src/Text/Pandoc/Writers/Textile.hs
@@ -125,7 +125,6 @@ blockToTextile _ HorizontalRule = return "<hr />\n"
blockToTextile opts (Header level (ident,classes,keyvals) inlines) = do
contents <- inlineListToTextile opts inlines
let identAttr = if null ident then "" else ('#':ident)
- let classAttr = unwords classes
let attribs = if null identAttr && null classes
then ""
else "(" ++ unwords classes ++ identAttr ++ ")"