diff --git a/lib/src/abstract/Lang.gf b/lib/src/abstract/Lang.gf
index 44840f728..e80bfd915 100644
--- a/lib/src/abstract/Lang.gf
+++ b/lib/src/abstract/Lang.gf
@@ -9,7 +9,7 @@ abstract Lang =
   Grammar, 
   Lexicon
   ,Construction  --- could be compiled here, but not in concretes, as they call Syntax and Grammar
-  ,Documentation
+  ,Documentation  --# notpresent
   ,Markup - [stringMark]
   ** {
   flags startcat=Phr ;
diff --git a/lib/src/finnish/DocumentationFinFunctor.gf b/lib/src/finnish/DocumentationFinFunctor.gf
index a20f9f845..cdceaba53 100644
--- a/lib/src/finnish/DocumentationFinFunctor.gf
+++ b/lib/src/finnish/DocumentationFinFunctor.gf
@@ -12,12 +12,14 @@ incomplete concrete DocumentationFinFunctor of Documentation = CatFin ** open
   HTML
 in {
 
-
 lincat
   Inflection = {t : Str; s1,s2 : Str} ;
   Document = {s : Str} ;
   Tag = {s : Str} ;
 
+{-
+-} --# notpresent
+
 oper
   heading : N -> Str = \n -> (nounHeading n).s ;
 
@@ -129,7 +131,8 @@ lin
 
 oper 
   verbExample : CatFin.Cl -> Str = \cl -> (S.mkUtt cl).s ;
-
+{-
+-} --# notpresent
   inflVerb : CatFin.V -> Str = \verb0 ->
      let 
        verb = sverb2verbSep verb0 ;
@@ -290,4 +293,7 @@ lin
   MkDocument b i e = ss (i.s1 ++ paragraph b.s ++ i.s2 ++ paragraph e.s) ;  -- explanation appended in a new paragraph
   MkTag i = ss (i.t) ;
 
+{- --# notpresent
+-} 
+
 }
diff --git a/lib/src/finnish/LangFin.gf b/lib/src/finnish/LangFin.gf
index 525a82201..8343c07d1 100644
--- a/lib/src/finnish/LangFin.gf
+++ b/lib/src/finnish/LangFin.gf
@@ -4,7 +4,7 @@ concrete LangFin of Lang =
   GrammarFin, 
   LexiconFin
   , ConstructionFin
-  , DocumentationFin
+  , DocumentationFin --# notpresent
   ** {
 
 flags startcat = Phr ; unlexer = text ; lexer = finnish ;
diff --git a/lib/src/french/DocumentationFreFunctor.gf b/lib/src/french/DocumentationFreFunctor.gf
index 7585ecd70..f8ca038d8 100644
--- a/lib/src/french/DocumentationFreFunctor.gf
+++ b/lib/src/french/DocumentationFreFunctor.gf
@@ -18,6 +18,9 @@ lincat
   Document = {s : Str} ;
   Tag = {s : Str} ;
   
+{-
+-} --# notpresent
+
 oper
    heading : N -> Str = \n -> (nounHeading n).s ;
    
@@ -209,4 +212,7 @@ oper
           tr (th (heading present_Parameter) ++ td (vfin VGer))
           ) ; 
 
+{- --# notpresent
+-} 
+
 }
diff --git a/lib/src/swedish/DocumentationSwe.gf b/lib/src/swedish/DocumentationSwe.gf
index e93f85ee5..88d3ee8dc 100644
--- a/lib/src/swedish/DocumentationSwe.gf
+++ b/lib/src/swedish/DocumentationSwe.gf
@@ -9,6 +9,10 @@ lincat
   Document = {s : Str} ;
   Tag = {s : Str} ;
 
+{-
+-} --# notpresent
+
+
 lin
   InflectionN, InflectionN2, InflectionN3 = \noun -> {
     t  = "s" ;
@@ -230,4 +234,8 @@ oper
     ) ;
     
   pp : Str -> Str = \s -> "<"+s+">";
+
+{- --# notpresent
+-}
+
 }
diff --git a/lib/src/swedish/DocumentationSweFunctor.gf b/lib/src/swedish/DocumentationSweFunctor.gf
index 7ccabc09b..a1f16a3d4 100644
--- a/lib/src/swedish/DocumentationSweFunctor.gf
+++ b/lib/src/swedish/DocumentationSweFunctor.gf
@@ -18,6 +18,10 @@ in {
 lincat
   Inflection = {s : Str} ;
   Document = {s : Str} ;
+
+{-
+-} --# notpresent
+
   
 oper
    tdf : Str -> Str = \s -> td (intag "i" s) ;
@@ -121,4 +125,7 @@ oper
        ))
      } ;
 
+{- --# notpresent
+-} 
+
 }