diff --git a/src/scandinavian/CommonScand.gf b/src/scandinavian/CommonScand.gf
index c556f5b28..8645ea19b 100644
--- a/src/scandinavian/CommonScand.gf
+++ b/src/scandinavian/CommonScand.gf
@@ -309,7 +309,11 @@ oper
     isSimple = False
     } ;
     
-  insertObj : (Agr => Str) -> VP -> VP = insertObjPron False ;
+  insertObj    : (Agr => Str) -> VP -> VP = insertObjPron False ;
+  
+  insertObjPre : (Agr => Str) -> VP -> VP = \obj,vp -> vp ** {
+    n2 = \\a => obj ! a ++ vp.n2 ! a  -- e.g. ser inte *bra* ut
+    } ;
   
   insertObjPost : (Agr => Str) -> VP -> VP = \obj,vp -> vp ** {
     n2 = \\a => vp.n2 ! a ++ obj ! a ;
diff --git a/src/scandinavian/VerbScand.gf b/src/scandinavian/VerbScand.gf
index ab9742255..83f10b0a5 100644
--- a/src/scandinavian/VerbScand.gf
+++ b/src/scandinavian/VerbScand.gf
@@ -18,7 +18,7 @@ incomplete concrete VerbScand of Verb = CatScand ** open CommonScand, ResScand,
     ComplVV v vp = insertObjPost (\\a => v.c2.s ++ infVP vp a) (predV v) ;
     ComplVS v s  = insertObjPost (\\_ => conjThat ++ s.s ! Sub) (predV v) ;  --- insertExt ?
     ComplVQ v q  = insertObjPost (\\_ => q.s ! QIndir) (predV v) ;
-    ComplVA v ap = insertObjPost (\\a => ap.s ! agrAdjNP a DIndef) (predV v) ;
+    ComplVA v ap = insertObjPre  (\\a => ap.s ! agrAdjNP a DIndef) (predV v) ;
 
     SlashV2V v vp = predV v ** {
       n3 = \\a => v.c3.s ++ infVP vp a ;