typo -> &SUGGEST

tools/grammarcheckers/grammarchecker.cg3

@@ -14,7 +14,7 @@
 # [email protected] or [email protected]
 
 # ==================================================================== #
-#!! #      G R E E N L A N D I C  G R A M M A R   C H E C K E R
+#!! #      G R E E N L A N D I C   G R A M M A R   C H E C K E R
 # ==================================================================== #
 # ====================================================================
 
@@ -67,13 +67,9 @@ LIST QMARK = QMARK ;
 
 #!! ## Grammarchecker sets
 
-LIST &err-agr = &err-agr ;
-LIST &err-gen-po = &err-gen-po ;
-LIST &err-no-conneg = &err-no-conneg ;
-LIST &err-orrood-inf = &err-orrood-inf ;
-LIST &err-ext-agr = &err-ext-agr ;
-LIST &err-ext-vagr = &err-ext-vagr ;
-
+LIST &ellipsis = &ellipsis ;
+LIST &guillemets = &guillemets ;
+LIST &typo = &typo ;
 LIST &err-arg-trm-ins = &err-arg-trm-ins ;
 MAPPING-PREFIX = & ;
 
@@ -93,10 +89,11 @@ ADD:spell-conservatively (&typo &SUGGESTWF) (<spelled>) IF (NEGATE -1 QMARK LINK
 # ADD:err-agr (&err-agr) TARGET V IF (-1C Pron + Pl1 + Nom) (0 V) (NOT 0 Pl1);
 # ADD:err-agr (&err-agr) TARGET V IF (-1C Pron + Pl2 + Nom) (0 V) (NOT 0 Pl2);
 
-ADD:err-arg-trm-ins (&err-arg-trm-ins) TARGET N + Trm IF (1 QAR);
-COPY:err-arg-trm-ins (Ins $SUGGEST) EXCEPT (Trm  &err-arg-trm-ins) TARGET (&err-arg-trm-ins);
+ADD:err-arg-trm-ins (&err-arg-trm-ins) TARGET N + Trm + Sg IF (1 QAR);
+COPY:err-arg-trm-ins (Ins Sg &SUGGEST) EXCEPT (Trm Sg  &err-arg-trm-ins) TARGET (&err-arg-trm-ins);
 
-# Nerisassiornermut soqutigisaqarpit?
+#err Nerisassiornermut soqutigisaqarpit? # er du interesseret til madlavning
+#ok  Nerisassiornermik soqutigisaqarpit? # er du interesseret i madlavning
 
 
 # And one with a suggestion where we simply change the tag Sg into Attr: