dropTarget
authorClaus Gittinger <cg@exept.de>
Mon, 23 Jan 2006 23:18:45 +0100
changeset 3241 9258970123b9
parent 3240 eb9262da45b6
child 3242 d01395c1b760
dropTarget
EditTextView.st
SelectionInListView.st
--- a/EditTextView.st	Mon Jan 23 20:57:08 2006 +0100
+++ b/EditTextView.st	Mon Jan 23 23:18:45 2006 +0100
@@ -22,8 +22,7 @@
 		editMode trimBlankLines wordWrap replacementWordSelectStyle
 		acceptChannel acceptEnabled st80Mode disableIfInvisible
 		cursorMovementWhenUpdating learnMode learnedMacro
-                cursorLineHolder cursorColHolder tabRequiresControl
-		undoSupport'
+		cursorLineHolder cursorColHolder tabRequiresControl undoSupport'
 	classVariableNames:'DefaultCursorForegroundColor DefaultCursorBackgroundColor
 		DefaultCursorType DefaultCursorNoFocusForegroundColor
 		DefaultCursorTypeNoFocus'
@@ -2139,18 +2138,6 @@
                        ifFalse:[ text add:(obj asString) ]
     ].
     self pasteOrReplace:text.
-!
-
-dropTarget
-    "returns the dropTarget or nil"
-
-    ^ dropTarget
-!
-
-dropTarget:aDropTragetOrNil
-    "set the dropTarget or nil"
-
-    dropTarget := aDropTragetOrNil.
 ! !
 
 !EditTextView methodsFor:'editing'!
@@ -6527,5 +6514,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.386 2006-01-23 19:57:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.387 2006-01-23 22:17:55 cg Exp $'
 ! !
--- a/SelectionInListView.st	Mon Jan 23 20:57:08 2006 +0100
+++ b/SelectionInListView.st	Mon Jan 23 23:18:45 2006 +0100
@@ -21,8 +21,7 @@
 		keyActionStyle returnKeyActionStyle toggleSelect strikeOut
 		iSearchString items doubleClickMsg hilightStyle clickPosition
 		allowDrag dragObjectConverter dragIsActive endDragAction
-                dropSource visualBlock selectedVisualBlock
-		selectConditionBlock'
+		dropSource visualBlock selectedVisualBlock selectConditionBlock'
 	classVariableNames:'RightArrowShadowForm RightArrowLightForm RightArrowForm
 		SmallRightArrowShadowForm SmallRightArrowLightForm
 		DefaultForegroundColor DefaultBackgroundColor
@@ -1915,20 +1914,6 @@
 
 !
 
-dropTarget
-    "returns the dropTarget or nil
-    "
-    ^ dropTarget
-!
-
-dropTarget:aDropTragetOrNil
-    "set the dropTarget or nil
-    "
-    dropTarget := aDropTragetOrNil.
-
-
-!
-
 startDragAt:aPoint
 
     dropSource isNil ifTrue:[
@@ -3981,5 +3966,5 @@
 !SelectionInListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.231 2006-01-23 19:57:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/SelectionInListView.st,v 1.232 2006-01-23 22:18:45 cg Exp $'
 ! !