2575 self changeSema wait. |
2575 self changeSema wait. |
2576 self debugMessage:'sema signal'. |
2576 self debugMessage:'sema signal'. |
2577 self isBusy:true. |
2577 self isBusy:true. |
2578 [ |
2578 [ |
2579 self directoryChangeFlag ifTrue:[ |
2579 self directoryChangeFlag ifTrue:[ |
2580 [ |
2580 self directoryChangeFlag:false. |
2581 self debugMessage:'directoryChanged'. |
2581 self debugMessage:'directoryChanged'. |
2582 self directoryChanged. |
2582 self directoryChanged. |
2583 ] valueNowOrOnUnwindDo:[ |
|
2584 self directoryChangeFlag:false |
|
2585 ]. |
|
2586 ]. |
2583 ]. |
2587 self directoryContentsChangeFlag ifTrue:[ |
2584 self directoryContentsChangeFlag ifTrue:[ |
2588 [ |
2585 self directoryContentsChangeFlag:false. |
2589 self debugMessage:'directoryContentsChanged'. |
2586 self debugMessage:'directoryContentsChanged'. |
2590 self directoryContentsChanged. |
2587 self directoryContentsChanged. |
2591 ] valueNowOrOnUnwindDo:[ |
|
2592 self directoryContentsChangeFlag:false |
|
2593 ] |
|
2594 ]. |
2588 ]. |
2595 self filterChangeFlag ifTrue:[ |
2589 self filterChangeFlag ifTrue:[ |
2596 [ |
2590 self filterChangeFlag:false. |
2597 self debugMessage:'filterChanged'. |
2591 self debugMessage:'filterChanged'. |
2598 self filterChanged. |
2592 self filterChanged. |
2599 ] valueNowOrOnUnwindDo:[ |
|
2600 self filterChangeFlag:false |
|
2601 ]. |
|
2602 ]. |
2593 ]. |
2603 self sortBlockChangeFlag ifTrue:[ |
2594 self sortBlockChangeFlag ifTrue:[ |
2604 [ |
2595 self sortBlockChangeFlag:false. |
2605 self debugMessage:'sortBlockChanged'. |
2596 self debugMessage:'sortBlockChanged'. |
2606 self sortBlockChanged. |
2597 self sortBlockChanged. |
2607 ] valueNowOrOnUnwindDo:[ |
|
2608 self sortBlockChangeFlag:false |
|
2609 ]. |
|
2610 ] |
2598 ] |
2611 ] ensure:[ |
2599 ] ensure:[ |
2612 self isBusy:false. |
2600 self isBusy:false. |
2613 ] |
2601 ] |
2614 ] |
2602 ] |