diff --git a/lib/src/slovenian/CatSlv.gf b/lib/src/slovenian/CatSlv.gf
index c99f3b02c..e193829e8 100644
--- a/lib/src/slovenian/CatSlv.gf
+++ b/lib/src/slovenian/CatSlv.gf
@@ -1,4 +1,4 @@
-concrete CatSlv of Cat = open ResSlv in {
+concrete CatSlv of Cat = CommonX ** open ResSlv in {
 
 lincat
   -- Adjective
diff --git a/lib/src/slovenian/ParadigmsSlv.gf b/lib/src/slovenian/ParadigmsSlv.gf
index 49dab964d..add86e549 100644
--- a/lib/src/slovenian/ParadigmsSlv.gf
+++ b/lib/src/slovenian/ParadigmsSlv.gf
@@ -1,4 +1,4 @@
-resource ParadigmsSlv = open CatSlv, ResSlv in {
+resource ParadigmsSlv = open CatSlv, ResSlv, Prelude in {
 
 oper
   nominative : Case = Nom ;
@@ -272,4 +272,6 @@ oper
            }
     };
 
+  mkAdv : Str -> Adv = \s -> lin Adv {s=s} ;
+
 }