aligningMove was undefined.
authorClaus Gittinger <cg@exept.de>
Mon, 20 Jan 1997 20:41:35 +0100
changeset 961 1b65b39c5079
parent 960 29a592101ad4
child 962 1f1033090efe
aligningMove was undefined.
ObjView.st
ObjectView.st
--- a/ObjView.st	Sat Jan 18 16:24:27 1997 +0100
+++ b/ObjView.st	Mon Jan 20 20:41:35 1997 +0100
@@ -22,7 +22,7 @@
 	category:'Views-Basic'
 !
 
-!ObjectView  class methodsFor:'documentation'!
+!ObjectView class methodsFor:'documentation'!
 
 copyright
 "
@@ -284,7 +284,7 @@
 "
 ! !
 
-!ObjectView  class methodsFor:'defaults'!
+!ObjectView class methodsFor:'defaults'!
 
 hitDelta
     "when clicking an object, allow for hitDelta pixels around object;
@@ -1600,7 +1600,10 @@
 
     leftHandCursor := Cursor leftHand.
     sorted := false.
-    aligning := false
+    aligning := false.
+    aligningMove := false.
+
+    "Modified: 20.1.1997 / 20:41:10 / cg"
 !
 
 setInitialDocumentFormat
@@ -2903,8 +2906,8 @@
     "Modified: 29.5.1996 / 16:20:49 / cg"
 ! !
 
-!ObjectView  class methodsFor:'documentation'!
+!ObjectView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ObjView.st,v 1.51 1996-10-01 11:42:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ObjView.st,v 1.52 1997-01-20 19:41:35 cg Exp $'
 ! !
--- a/ObjectView.st	Sat Jan 18 16:24:27 1997 +0100
+++ b/ObjectView.st	Mon Jan 20 20:41:35 1997 +0100
@@ -22,7 +22,7 @@
 	category:'Views-Basic'
 !
 
-!ObjectView  class methodsFor:'documentation'!
+!ObjectView class methodsFor:'documentation'!
 
 copyright
 "
@@ -284,7 +284,7 @@
 "
 ! !
 
-!ObjectView  class methodsFor:'defaults'!
+!ObjectView class methodsFor:'defaults'!
 
 hitDelta
     "when clicking an object, allow for hitDelta pixels around object;
@@ -1600,7 +1600,10 @@
 
     leftHandCursor := Cursor leftHand.
     sorted := false.
-    aligning := false
+    aligning := false.
+    aligningMove := false.
+
+    "Modified: 20.1.1997 / 20:41:10 / cg"
 !
 
 setInitialDocumentFormat
@@ -2903,8 +2906,8 @@
     "Modified: 29.5.1996 / 16:20:49 / cg"
 ! !
 
-!ObjectView  class methodsFor:'documentation'!
+!ObjectView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.51 1996-10-01 11:42:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.52 1997-01-20 19:41:35 cg Exp $'
 ! !