diff --git a/src/scandinavian/VerbScand.gf b/src/scandinavian/VerbScand.gf
index 4dfc95cc6..16376b12c 100644
--- a/src/scandinavian/VerbScand.gf
+++ b/src/scandinavian/VerbScand.gf
@@ -79,6 +79,6 @@ incomplete concrete VerbScand of Verb = CatScand ** open CommonScand, ResScand,
 
     AdvVPSlash vps adv = insertAdv adv.s vps ** {c2 = vps.c2 ; n3 = vps.n3} ;
     AdVVPSlash adv vps = insertAdV adv.s vps ** {c2 = vps.c2 ; n3 = vps.n3} ;
-    ExtAdvVP vp adv = insertExt ("," ++ adv.s) vp ;
+    ExtAdvVP vp adv = insertExt (comma ++ adv.s) vp ;
 
 }