Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Better printing of unnamed options

  • Loading branch information...
commit 25e50589fcf5b51cb8e34b0338433110bb31a351 1 parent 8f321f3
@np authored
Showing with 3 additions and 1 deletion.
  1. +3 −1 Language/LaTeX/Printer.hs
View
4 Language/LaTeX/Printer.hs
@@ -46,7 +46,9 @@ vcat = mconcat . intersperse nl
vcat2 = mconcat . intersperse nl2
ppNamed :: Named ShowS -> ShowS
-ppNamed (Named name val) = text name ⊕ text "=" ⊕ val
+ppNamed (Named name val)
+ | null name = val
+ | otherwise = text name ⊕ text "=" ⊕ val
commas :: [ShowS] -> ShowS
commas = mconcat . intersperse (text ",")
Please sign in to comment.
Something went wrong with that request. Please try again.