Permalink
Browse files

Clean up formatting.

  • Loading branch information...
1 parent 2075707 commit f6d1fa311dd665ffbd47cbed888dc0884855102a @solidsnack committed May 26, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 hs/Language/Bash/PrettyPrinter.hs
View
4 hs/Language/Bash/PrettyPrinter.hs
@@ -89,7 +89,7 @@ instance (Annotation t) => PP (Statement t) where
outdent
NoOp msg | null msg -> word ":"
| otherwise -> word ":" >> (word . Esc.bytes . Esc.bash) msg
- Bang t -> hang "!" >> binGrp t >> outdent
+ Bang t -> hang "!" >> binGrp t >> outdent
AndAnd t t' -> binGrp t >> word "&&" >> nl >> binGrp t'
OrOr t t' -> binGrp t >> word "||" >> nl >> binGrp t'
Pipe t t' -> binGrp t >> word "|" >> nl >> binGrp t'
@@ -170,7 +170,7 @@ identpart (VarIdent ident) = bytes ident
trimPrinter :: Trim -> ByteString
trimPrinter ShortestLeading = "#"
trimPrinter LongestLeading = "##"
-trimPrinter ShortestTrailing = "%"
+trimPrinter ShortestTrailing = "%"
trimPrinter LongestTrailing = "%%"
binGrp a@(Annotated _ stmt) = case stmt of

0 comments on commit f6d1fa3

Please sign in to comment.