Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Sat, 19 Apr 1997 12:22:42 +0200
changeset 1199 9eb49bbc4860
parent 1198 1c5390d2d3fb
child 1200 44519e048a96
checkin from browser
SelListV.st file | annotate | diff | comparison | revisions
SelectionInListView.st file | annotate | diff | comparison | revisions 
--- a/SelListV.st	Sat Apr 19 11:24:45 1997 +0200
+++ b/SelListV.st	Sat Apr 19 12:22:42 1997 +0200
@@ -2650,14 +2650,19 @@
     dragAndDropMgr := DragAndDropManager new.
     dragAndDropMgr dropObjects:(self collectionOfDragObjects).
 
-    dragAndDropMgr startOpaqueDrag:[:aPoint :aView| self showDraggingIn:aView at:aPoint - (xOffset@0)]
-                            offset:(xOffset @ h)
-                            extent:(w*5)@(h*2)
-                               in:self
-                               at:(x@y)
-                            atEnd:endDragAction.
-
-    "Modified: 17.4.1997 / 12:54:24 / cg"
+    dragAndDropMgr 
+        startOpaqueDrag:[:aPoint :aView | 
+                            self 
+                                showDraggingIn:aView 
+                                at:aPoint - (xOffset@0)
+                        ]
+        offset:(xOffset @ h)
+        extent:(w*5)@(h*2)
+        in:self
+        at:(x@y)
+        atEnd:endDragAction.
+
+    "Modified: 19.4.1997 / 10:00:16 / cg"
 ! !
 
 !SelectionInListView methodsFor:'queries'!
@@ -3267,5 +3272,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.101 1997-04-18 19:11:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/SelListV.st,v 1.102 1997-04-19 10:22:42 cg Exp $'
 ! !
--- a/SelectionInListView.st	Sat Apr 19 11:24:45 1997 +0200
+++ b/SelectionInListView.st	Sat Apr 19 12:22:42 1997 +0200
@@ -2650,14 +2650,19 @@
     dragAndDropMgr := DragAndDropManager new.
     dragAndDropMgr dropObjects:(self collectionOfDragObjects).
 
-    dragAndDropMgr startOpaqueDrag:[:aPoint :aView| self showDraggingIn:aView at:aPoint - (xOffset@0)]
-                            offset:(xOffset @ h)
-                            extent:(w*5)@(h*2)
-                               in:self
-                               at:(x@y)
-                            atEnd:endDragAction.
-
-    "Modified: 17.4.1997 / 12:54:24 / cg"
+    dragAndDropMgr 
+        startOpaqueDrag:[:aPoint :aView | 
+                            self 
+                                showDraggingIn:aView 
+                                at:aPoint - (xOffset@0)
+                        ]
+        offset:(xOffset @ h)
+        extent:(w*5)@(h*2)
+        in:self
+        at:(x@y)
+        atEnd:endDragAction.
+
+    "Modified: 19.4.1997 / 10:00:16 / cg"
 ! !
 
 !SelectionInListView methodsFor:'queries'!
@@ -3267,5 +3272,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.101 1997-04-18 19:11:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.102 1997-04-19 10:22:42 cg Exp $'
 ! !
hg/stx-libwidg