--- a/Tools__NewSystemBrowser.st	Fri Feb 24 13:45:43 2017 +0100
+++ b/Tools__NewSystemBrowser.st	Fri Feb 24 16:54:59 2017 +0100
@@ -29703,11 +29703,13 @@
     "Created: / 25-11-2016 / 15:05:01 / cg"
 !
 
-browseClassesPackageDirectoryOf:aClass
+browseClassesPackageDirectoryOf:aClassOrMeta
     "open a filebrowser in the classes package directory"
 
-    |fileBrowser dir fn|
-
+    |aClass fileBrowser dir fn|
+
+    aClass := aClassOrMeta theNonMetaclass.
+    
     aClass package == PackageId noProjectID ifTrue:[
         Dialog warn:'No project directory (the class is not assigned to any package).'.
         ^ self.
@@ -29730,6 +29732,7 @@
     ]
 
     "Created: / 25-11-2016 / 15:06:05 / cg"
+    "Modified: / 24-02-2017 / 16:54:27 / cg"
 !
 
 checkCompilabilityOf:aClass errorsOnly:errorsOnly notify:warningCollector reportFailedMethodsInto:aBlock
@@ -40478,6 +40481,7 @@
     ].
 
     "Created: / 25-11-2016 / 15:07:30 / cg"
+    "Modified: / 24-02-2017 / 16:54:32 / cg"
 !
 
 methodListMenuCheckInClass