use decodeFromLiteralArray:
authorClaus Gittinger <cg@exept.de>
Tue, 27 Mar 2007 10:55:37 +0200
changeset 7764 54a93e4aff7b
parent 7763 6a17ca4cef7b
child 7765 82784792b24e
use decodeFromLiteralArray:
DirectoryContentsBrowser.st
--- a/DirectoryContentsBrowser.st	Tue Mar 27 10:54:43 2007 +0200
+++ b/DirectoryContentsBrowser.st	Tue Mar 27 10:55:37 2007 +0200
@@ -721,7 +721,9 @@
 
     <resource: #programMenu>
 
-    ^ Menu new fromLiteralArrayEncoding:self viewBrowserMenuSpec
+    ^ Menu decodeFromLiteralArray:self viewBrowserMenuSpec
+
+    "Modified: / 27-03-2007 / 08:46:24 / cg"
 !
 
 viewBrowserMenuSpec
@@ -898,7 +900,7 @@
         |col readSelector|
 
         col := aDesc isSequenceable 
-                ifTrue:[DataSetColumnSpec new fromLiteralArrayEncoding:aDesc]
+                ifTrue:[DataSetColumnSpec decodeFromLiteralArray:aDesc]
                 ifFalse:[aDesc].
         columnDescriptors add:col.
 
@@ -917,6 +919,8 @@
             ]
         ]
     ].
+
+    "Modified: / 27-03-2007 / 08:46:33 / cg"
 !
 
 directory
@@ -1532,7 +1536,7 @@
 
     selection := self selectedItems.
     buffer := self class tableColumns 
-                collect:[:col| (DataSetColumnSpec new fromLiteralArrayEncoding:col)].
+                collect:[:col| (DataSetColumnSpec decodeFromLiteralArray:col)].
 
     columns := buffer asOrderedCollection.
     self viewDetails value = false ifTrue:[
@@ -1580,6 +1584,8 @@
     self columnDescriptors:(self tableColumns value).
     self selectItems:selection.
     self wakeUp.
+
+    "Modified: / 27-03-2007 / 08:46:28 / cg"
 ! !
 
 !DirectoryContentsBrowser methodsFor:'drag & drop'!
@@ -3257,5 +3263,5 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.205 2007-03-06 15:38:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.206 2007-03-27 08:55:37 cg Exp $'
 ! !