--- a/ProjectChecker.st	Tue Sep 17 12:25:12 2019 +0200
+++ b/ProjectChecker.st	Wed Sep 18 10:06:08 2019 +0200
@@ -517,16 +517,21 @@
 checkMethodSTCCompilability1: method into: problemIssue
     "Checks is the method can be compiled by STC based on Parser error/warnings"
 
-    | lang |
+    | lang cls |
 
     lang := method programmingLanguage. 
     lang isSmalltalk ifFalse:[ ^ self ].
 
-    method usedGlobals do:[:nm | 
+    method usedGlobals do:[:nm |
         nm isLowercaseFirst ifTrue:[
-            problemIssue 
-                addWarning:'Contains reference to lowercase global: ', nm
-                from:0 to:0
+            "/ not if that refers to a project definition
+            ((cls := Smalltalk classNamed:nm) notNil
+              and:[cls isProjectDefinition]
+            ) ifFalse:[
+                problemIssue 
+                    addWarning:'Contains reference to lowercase global: ', nm
+                    from:0 to:0
+            ].
         ].
         (nm startsWith:Smalltalk undeclaredPrefix) ifTrue:[
             problemIssue