fixes #58 (string containing =)

Author: gvolpe

data/dconf.settings

@@ -316,3 +316,6 @@ world-clocks=[{'location': <(uint32 2, <('Houston', 'KHOU', false, [(0.517271957
 [org/gnome/shell/extensions/arcmenu]
 hot-corners='Disabled'
 recently-installed-apps=['RollerCoaster Tycoon 3 Platinum!.desktop', 'RollerCoaster Tycoon Deluxe.desktop', 'RollerCoaster Tycoon 2 Triple Thrill Pack.desktop', 'American Truck Simulator.desktop', 'Halo The Master Chief Collection.desktop', 'Bejeweled 3.desktop']
+
+[org/gnome/evolution-data-server/calendar/list-of-equal]
+reminders-snoozed=['=']

output/dconf.nix

@@ -392,5 +392,9 @@ with lib.hm.gvariant;
       recently-installed-apps = [ "RollerCoaster Tycoon 3 Platinum!.desktop" "RollerCoaster Tycoon Deluxe.desktop" "RollerCoaster Tycoon 2 Triple Thrill Pack.desktop" "American Truck Simulator.desktop" "Halo The Master Chief Collection.desktop" "Bejeweled 3.desktop" ];
     };
 
+    "org/gnome/evolution-data-server/calendar/list-of-equal" = {
+      reminders-snoozed = [ "=" ];
+    };
+
   };
 }

src/DConf.hs

@@ -70,7 +70,7 @@ vString parser = try $ do
  where
   single = many1 (string "'") *> parser inputs (string "'")
   double = many1 (char '"') *> parser (inputs <|> string "'") (char '"')
-  tokens = many1 <$> [alphaNum, space] ++ (char <$> "$!&+-_()[]{},#@\\")
+  tokens = many1 <$> [alphaNum, space] ++ (char <$> "=$!&+-_()[]{},#@\\")
   files  = many1 . char <$> ":/."
   shorts = many1 . char <$> "<>"
   inputs = choice (tokens ++ files ++ shorts)