Frank Shearar uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-fbs.478.mcz
==================== Summary ====================
Name: Tools-fbs.478 Author: fbs Time: 2 July 2013, 8:55:00.661 pm UUID: e23933e2-9027-7b4f-97a8-c1c5dc0620de Ancestors: Tools-fbs.477
Revert accidental commit of alpha quality exploratory hack.
=============== Diff against Tools-fbs.477 ===============
Item was changed: ----- Method: Browser>>dragFromClassList: (in category 'drag and drop') ----- dragFromClassList: index "Drag a class from the browser" | name envt | (name := self classList at: index) ifNil: [ ^ nil ]. (envt := self selectedEnvironment) ifNil: [ ^ nil ]. - "To maintain our current place in the list, try select the next class." - (self classList size = 1) ifTrue: [self selectClassNamed: self classList first]. - (self classList size > 2) ifTrue: [ | currClassName classNames | - currClassName := self selectedClassName. - classNames := self classList. - self selectClassNamed: (currClassName = classNames last - ifTrue: [self classList before: currClassName] - ifFalse: [self classList after: currClassName])]. ^ envt at: name withBlanksTrimmed asSymbol ifAbsent: [ ]!
packages@lists.squeakfoundation.org