--- a/Method.st	Thu Apr 18 14:47:31 2013 +0200
+++ b/Method.st	Thu Apr 18 15:24:30 2013 +0200
@@ -937,6 +937,7 @@
     "Modified (format): / 18-11-2011 / 14:47:06 / cg"
 ! !
 
+
 !Method methodsFor:'accessing-visibility'!
 
 isIgnored
@@ -2640,7 +2641,9 @@
 
     |myClass myProjectDefinition|
 
-    myClass := self mclass theNonMetaclass.
+    myClass := self mclass.
+    myClass isNil ifTrue:[^ false].
+    myClass := myClass theNonMetaclass.
     ^ myClass notNil
         and:[ package ~= myClass package
         and:[ (myProjectDefinition := myClass projectDefinitionClass) notNil
@@ -3522,6 +3525,7 @@
     "Created: / 23-07-2012 / 11:16:36 / cg"
 ! !
 
+
 !Method methodsFor:'source management'!
 
 revisionInfo
@@ -3769,11 +3773,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.409 2013-04-14 12:37:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.410 2013-04-18 13:24:30 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.409 2013-04-14 12:37:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.410 2013-04-18 13:24:30 cg Exp $'
 !
 
 version_SVN