--- a/PackageId.st	Sun Aug 23 11:48:39 2015 +0200
+++ b/PackageId.st	Mon Aug 24 14:57:16 2015 +0200
@@ -165,11 +165,11 @@
 
     |components|
 
-    (aString includes:$:) ifFalse:[
+    (aString notEmptyOrNil and:[(aString includes:$:) not]) ifTrue:[
         "/ assume its a path
         components := aString asFilename components.
         self module:components first directory:((components copyFrom:2) asStringWith:$/).
-    ] ifTrue:[
+    ] ifFalse:[
         packageIdString := aString asSymbol.
     ]