replace '≔' and '·' with '=' and (only) '.'

lib/Quox/Syntax/Qty.idr

@@ -15,16 +15,15 @@ commas [x]     = [x]
 commas (x::xs) = (x <+> hl Delim ",") :: commas xs
 
 private %inline
-blobD : Pretty.HasEnv m => m (Doc HL)
-blobD = hlF Delim $ ifUnicode "·" "%"
+dotD : Doc HL
+dotD = hl Delim "."
 
 export %inline
 prettyQtyBinds : Pretty.HasEnv m => PrettyHL q => PrettyHL a =>
                  List q -> a -> m (Doc HL)
 prettyQtyBinds []   x = pretty0M x
 prettyQtyBinds qtys x = pure $
-  hang 2 $ sep [aseparate comma !(traverse pretty0M qtys) <++> !blobD,
-                !(pretty0M x)]
+  hcat [hseparate comma !(traverse pretty0M qtys), dotD, align !(pretty0M x)]
 
 
 public export