--- a/SourceCodeManagerUtilities.st	Mon Nov 20 12:37:26 2006 +0100
+++ b/SourceCodeManagerUtilities.st	Mon Nov 20 22:26:51 2006 +0100
@@ -1460,7 +1460,7 @@
                         root := mgr getCVSROOTForModule:(aClass package upTo:$:).
                         root := mgr repositoryTopDirectoryFromCVSRoot:root.
                         newString := '$', 'Header: ',(root copyReplaceAll: $: with:$/ ),'/'
-                                     ,(Smalltalk fileNameForClass:aClass),'.st,v ',rev
+                                     ,(Smalltalk fileNameForClass:aClass),'.st,v ',rev,' '
                                      ,(Date today printStringFormat:'%y/%m/%d'),' '
                                      ,(Time now printStringFormat:'%h/%m/%s'),' '
                                      ,(OperatingSystem getLoginName),' Exp $'.
@@ -1475,7 +1475,7 @@
       self compareClassWithRepository:Array
     "
 
-    "Modified: / 13-10-2006 / 01:02:16 / cg"
+    "Modified: / 20-11-2006 / 22:26:54 / cg"
 !
 
 compareProjectWithRepository:aProject
@@ -1991,7 +1991,7 @@
 
     aClass instAndClassSelectorsAndMethodsDo:[:sel :mthd | mthd setPackage:requiredPackage].
     aClass package:requiredPackage.
-
+self halt.
     (mgr
             createContainerFor:aClass
             inModule:module
@@ -2002,7 +2002,7 @@
     ].
     ^ true
 
-    "Modified: / 25-10-2006 / 11:12:22 / cg"
+    "Modified: / 20-11-2006 / 22:15:46 / cg"
 !
 
 removeSourceContainerForClass:aClass
@@ -2855,5 +2855,5 @@
 !SourceCodeManagerUtilities class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.152 2006-11-16 11:12:33 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.153 2006-11-20 21:26:51 cg Exp $'
 ! !