setIndentChar c = modifyState (\x -> x { indentChar = Just c }) >> return c
setIndentChar c = modifyState (\x -> x { indentChar = Just c }) >> return c
setIndentChar c = modifyState (\x -> x { indentChar = Just c }) >> return c