in latest 40 [Nautilus] we cannot drap and drop classes
Hi nicolai may be this is linked to your nautilus pass Right now I cannot drag and drop a class to a different package. Stef dropInAPackage: aCollection into: receiver aCollection do:[:aClass | self showGroups ifTrue: [ receiver addClasses: { aClass }. ActiveHand shiftPressed ifFalse: [ self selectedGroup removeClass: aClass. self updateClassView ]] ifFalse: [ receiver addClass: aClass theNonMetaClass. ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ aClass is an iconicItem not a class ActiveHand shiftPressed ifTrue: [ self selectedClass: nil. self updateClassView ] ifFalse:[ self selectedPackage: receiver. self selectedClass: aClass. self updateBothView ]]]
2014-07-27 9:20 GMT+02:00 stepharo <stepharo@free.fr>:
Hi nicolai
may be this is linked to your nautilus pass Right now I cannot drag and drop a class to a different package.
Stef
dropInAPackage: aCollection into: receiver
aCollection do:[:aClass | self showGroups ifTrue: [ receiver addClasses: { aClass }. ActiveHand shiftPressed ifFalse: [ self selectedGroup removeClass: aClass. self updateClassView ]] ifFalse: [ receiver addClass: aClass theNonMetaClass. ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
aClass is an iconicItem not a class
ActiveHand shiftPressed ifTrue: [ self selectedClass: nil. self updateClassView ] ifFalse:[ self selectedPackage: receiver. self selectedClass: aClass. self updateBothView ]]]
Yes, I missed the drag and drop part. Will fix with next refractoring step. nicolai
participants (3)
-
Marcus Denker -
Nicolai Hess -
stepharo