pStringSetting :: String -> Parser String
pStringSetting name = do
    string name
    spaces
    anyChar `manyTill` newline
pStringSetting :: String -> Parser String
pStringSetting name = do
    string name
    spaces
    anyChar `manyTill` newline
pStringSetting name = do
    string name
    spaces
    anyChar `manyTill` newline