--- a/mercurial/HGPackageModel.st Fri Jun 21 23:59:01 2013 +0100
+++ b/mercurial/HGPackageModel.st Sat Jun 22 11:35:41 2013 +0100
@@ -120,14 +120,12 @@
f := wcopy root asFilename.
i to:components size do:[:j |
f := f / (components at:j).
- Transcript showCR: 'Trying ' , aSymbolOrPackageId , ' --> ' , f pathName.
f exists ifTrue:[
wcopyroot := wcopy root.
i to:components size do:[:j |
wcopyroot := wcopyroot / (components at:j).
].
repositoryRoot := wcopyroot pathNameRelative.
- Transcript showCR: 'Root is ' , repositoryRoot.
^ self.
]
]
@@ -135,7 +133,7 @@
repositoryRoot := '.'.
"Created: / 01-12-2012 / 17:52:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 21-06-2013 / 22:37:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 22-06-2013 / 11:35:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!HGPackageModel methodsFor:'printing & storing'!