--- a/mercurial/HGPackageModelRegistry.st Mon Dec 03 16:20:11 2012 +0000
+++ b/mercurial/HGPackageModelRegistry.st Mon Dec 03 17:20:57 2012 +0000
@@ -34,12 +34,12 @@
i2 := package indexOf: $:.
components add: (package copyFrom: i1 to: i2 - 1).
- names add (package copyFrom: 1 to: i2 - 1).
+ names add: (package copyFrom: 1 to: i2 - 1).
i1 := i2 + 1.
[ (i2 := package indexOf: $/ startingAt: i1) ~~ 0 ] whileTrue:[
components add: (package copyFrom: i1 to: i2 - 1).
- names add (package copyFrom: 1 to: i2 - 1).
+ names add: (package copyFrom: 1 to: i2 - 1).
i1 := i2 + 1.
].