--- a/extensions.st	Sat Jul 09 16:16:38 2011 +0200
+++ b/extensions.st	Sat Jul 09 16:27:53 2011 +0200
@@ -103,7 +103,7 @@
     | defs |
 
     defs := (self at: #managerPerMatchingModuleDefinitions ifAbsent:[^OrderedCollection new]).
-    ^defs decodeAsLiteralArray asOrderedCollection
+    ^(defs collect:[:e|e decodeAsLiteralArray]) asOrderedCollection
 
     "
         UserPreferences current managerPerMatchingModuleDefinitions
@@ -118,7 +118,7 @@
 managerPerMatchingModuleDefinitions: defs
 
     self at: #managerPerMatchingModuleDefinitions 
-        put: defs asArray literalArrayEncoding.
+        put: (defs collect:[:e| e literalArrayEncoding]) asArray.
     AbstractSourceCodeManager managerPerMatchingModuleDefinitions == defs ifFalse:[
         AbstractSourceCodeManager managerPerMatchingModuleDefinitions: defs.
     ]
@@ -129,5 +129,5 @@
 !stx_libbasic3 class methodsFor:'documentation'!
 
 extensionsVersion_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/extensions.st,v 1.6 2011-07-09 14:16:38 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/extensions.st,v 1.7 2011-07-09 14:27:53 vrany Exp $'
 ! !
\ No newline at end of file