#UI_ENHANCEMENT
class: DirectoryContentsBrowser
changed:5 methods
update directorylist after some actions
--- a/DirectoryContentsBrowser.st Wed Feb 03 16:25:52 2016 +0100
+++ b/DirectoryContentsBrowser.st Thu Feb 04 10:54:38 2016 +0100
@@ -1611,10 +1611,9 @@
self directoryContentsChanged. "/ to force update of the numberOfShown files.
nextItem notNil ifTrue:[
self
- enqueueMessage:#value
- for:[ self selectionInFileList value:(OrderedCollection with:nextItem).
- self selectItems:(OrderedCollection with:nextItem) ]
- arguments:#().
+ enqueueDelayedAction:[
+ self selectionInFileList value:(OrderedCollection with:nextItem).
+ self selectItems:(OrderedCollection with:nextItem) ].
"/ self selectionInFileList value:(OrderedCollection with:nextItem).
"/ self selectItems:(OrderedCollection with:nextItem).
].
@@ -2464,7 +2463,6 @@
].
self
enqueueMessage:#setBrowserItemList:
- for:self
arguments:(Array with:filteredItems).
!
@@ -2551,12 +2549,10 @@
]
].
self
- enqueueMessage:#value
- for:[
+ enqueueDelayedAction:[
self browserItemListAdd:itemsToAdd remove:itemsToRemove.
filterChangeFlag := false.
- ]
- arguments:#().
+ ].
filteredItems := newItems.
"Modified: / 23-03-2012 / 14:42:32 / cg"
@@ -2610,9 +2606,7 @@
filteredItems := newFilteredItems.
filteredItems := self sortBlockHolder value sortItemList:filteredItems.
self
- enqueueMessage:#value
- for:[ self setBrowserItemList:filteredItems ]
- arguments:#().
+ enqueueDelayedAction:[ self setBrowserItemList:filteredItems ].
].
"Modified: / 20-11-2012 / 14:28:54 / cg"
@@ -2675,9 +2669,7 @@
filteredItems isNil ifTrue:[ ^ self].
filteredItems := self sortBlockHolder value sortItemList:filteredItems.
self
- enqueueMessage:#value
- for:[ self setBrowserItemList:filteredItems ]
- arguments:#().
+ enqueueDelayedAction:[ self setBrowserItemList:filteredItems ].
!
startUpdateTask