DSVColumnView.st
changeset 3964 df77ea0f171d
parent 3962 0b5f7e526d0f
child 3986 163354e9ee4c
--- a/DSVColumnView.st	Wed Nov 03 01:35:57 2010 +0100
+++ b/DSVColumnView.st	Mon Nov 08 22:13:32 2010 +0100
@@ -1109,7 +1109,7 @@
         (sortColNr := labelView indexOfSortColumn) notNil ifTrue:[
             sortBlockSelector := (columnDescriptors at:sortColNr) sortBlockSelector.
             sortBlockSelector notNil ifTrue:[
-                sortBlock := self application perform:sortBlockSelector.
+                sortBlock := self application aspectFor:sortBlockSelector.
                 newList sort:sortBlock
             ] ifFalse:[
                 sortSelectorOrBlock := (columnDescriptors at:sortColNr) sortSelector.
@@ -1143,7 +1143,7 @@
     cachedPreferredExtent := nil.
     self contentsChanged.
 
-    "Modified: / 06-05-2010 / 10:22:31 / cg"
+    "Modified: / 08-11-2010 / 22:07:49 / cg"
 ! !
 
 !DSVColumnView methodsFor:'accessing-visibility'!
@@ -4638,9 +4638,9 @@
 !DSVColumnView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.263 2010-11-02 21:05:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.264 2010-11-08 21:13:32 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.263 2010-11-02 21:05:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.264 2010-11-08 21:13:32 cg Exp $'
 ! !