--- a/ProjectChecker.st	Sat Jan 21 04:49:34 2017 +0000
+++ b/ProjectChecker.st	Sat Jan 21 13:24:08 2017 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2006 by eXept Software AG
               All Rights Reserved
@@ -342,7 +340,7 @@
                 | ns |
 
                 ns := cls nameSpace.
-                (ns ~~ Smalltalk and:[(ns at: poolName asSymbol) notNil]) ifTrue:[
+                (ns == Smalltalk or:[(ns at: poolName asSymbol) isNil]) ifTrue:[
                     self addProblem:
                         (ProjectProblem newClassUsesPoolButItIsNotASharedPool
                                 className: cls name;