4 import Text.Encodings.Base64
6 import Gast.CommandLine
8 pBase :: String -> Bool
9 pBase s = s == base64Decode (base64Encode s)
11 pURL :: String -> Bool
12 pURL s = s == base64URLDecode (base64URLEncode s)
14 Start w = exposeProperties [] [] [pBase, pURL] w