Smalltalk.st
branchjv
changeset 18859 0ce287fb826a
parent 18800 02724cc719b6
child 18873 ce58d469e583
--- a/Smalltalk.st	Wed Oct 28 07:44:54 2015 +0000
+++ b/Smalltalk.st	Wed Oct 28 10:00:01 2015 +0100
@@ -3000,7 +3000,11 @@
 		].
 		cls isJavaClass ifFalse:[
 		    cls instAndClassSelectorsAndMethodsDo:[:sel :mthd |
-			allProjects add:mthd package asSymbol.
+			| package packageAsSymbol |
+
+			package := mthd package.
+			packageAsSymbol := package asSymbol.
+			allProjects add: packageAsSymbol
 		    ].
 		].
 	    ].