--- 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 $'
! !