--- a/SourceCodeManagerUtilitiesForWorkspaceBasedManagers.st	Fri Mar 22 14:30:30 2013 +0100
+++ b/SourceCodeManagerUtilitiesForWorkspaceBasedManagers.st	Fri Mar 22 14:30:42 2013 +0100
@@ -180,6 +180,11 @@
     path := pkgDir construct:self nameOfExtensionsContainer.
     methodsToCheckIn notEmpty ifTrue:[
         extensionsSource := self sourceCodeForExtensions:methodsToCheckIn package:packageToCheckIn forManager:mgr.
+        "Care for non-ASCII/non-ISO-8859 characters in extension methods"
+        extensionsSource isWideString ifTrue:[
+            extensionsSource := '"{ Encoding: utf8 }"' , Character cr asString , Character cr asString , extensionsSource.                
+            extensionsSource := extensionsSource utf8Encoded.
+        ].
         fileIsNew := path exists not.
         path contents:extensionsSource.
         fileIsNew ifTrue:[
@@ -213,9 +218,10 @@
 !SourceCodeManagerUtilitiesForWorkspaceBasedManagers class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForWorkspaceBasedManagers.st,v 1.3 2012-09-26 16:17:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForWorkspaceBasedManagers.st,v 1.4 2013-03-22 13:30:42 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForWorkspaceBasedManagers.st,v 1.3 2012-09-26 16:17:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForWorkspaceBasedManagers.st,v 1.4 2013-03-22 13:30:42 cg Exp $'
 ! !
+