--- a/AbstractSourceCodeManager.st	Thu Nov 05 18:21:00 2009 +0100
+++ b/AbstractSourceCodeManager.st	Fri Nov 06 13:26:45 2009 +0100
@@ -968,22 +968,41 @@
 
     (p := Project current) notNil ifTrue:[
         p condenseChangesForClassCheckin:aClass.
-    ]
-
-    "Created: / 5.11.2001 / 14:23:00 / cg"
+    ].
+
+    "/
+    "/ Set the source code for every method of the checked in class
+    "/ Ensure that the source code for the compiled methods is the original one
+    "/ Done to avoid checking out from the repository using binaryRevision and sourcePosition
+    "/
+    aClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
+        mthd makeLocalStringSource.
+    ].
+    aClass allPrivateClassesDo:[:eachPrivateClass |
+        eachPrivateClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
+            mthd makeLocalStringSource.
+        ]
+    ].
 !
 
 postCheckInExtensionsForPackage:aPackageId
     "invoked after a checkIn"
 
-    |p|
+    |p extensionMethods|
 
     (p := Project current) notNil ifTrue:[
         p condenseChangesForExtensionsCheckInInPackage:aPackageId.
-    ]
-
-    "Created: / 5.11.2001 / 14:23:31 / cg"
-    "Modified: / 5.11.2001 / 17:07:38 / cg"
+    ].
+
+    "/
+    "/ Set the source code for every extension method of the checked in aPackageId
+    "/ Ensure that the source code for the compiled methods is the original one
+    "/ Done to avoid checking out from the repository
+    "/
+    extensionMethods := Smalltalk allExtensionsForPackage:aPackageId.
+    extensionMethods do:[:mthd |
+        mthd makeLocalStringSource.
+    ].
 !
 
 reportError:msg
@@ -2750,11 +2769,11 @@
 !AbstractSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.233 2009-11-05 17:21:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.234 2009-11-06 12:26:45 fm Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.233 2009-11-05 17:21:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.234 2009-11-06 12:26:45 fm Exp $'
 ! !
 
 AbstractSourceCodeManager initialize!