equal
deleted
inserted
replaced
436 item isNil ifTrue:[^ nil]. |
436 item isNil ifTrue:[^ nil]. |
437 item isString ifTrue:[^ item asSymbol]. |
437 item isString ifTrue:[^ item asSymbol]. |
438 |
438 |
439 item canExpand ifTrue:[ |
439 item canExpand ifTrue:[ |
440 now := Timestamp now. |
440 now := Timestamp now. |
441 overItem := dropInfo at:#overItem ifAbsentPut:[item]. |
441 overItem := dropInfo at:#overItem ifAbsentPut:item. |
442 timeOverItem := dropInfo at:#timeOverItem ifAbsentPut:[now]. |
442 timeOverItem := dropInfo at:#timeOverItem ifAbsentPut:[now]. |
443 |
443 |
444 overItem ~~ item ifTrue:[ |
444 overItem ~~ item ifTrue:[ |
445 dropInfo at:#timeOverItem put:now. |
445 dropInfo at:#timeOverItem put:now. |
446 dropInfo at:#overItem put:item. |
446 dropInfo at:#overItem put:item. |
825 ! ! |
825 ! ! |
826 |
826 |
827 !ProjectList class methodsFor:'documentation'! |
827 !ProjectList class methodsFor:'documentation'! |
828 |
828 |
829 version |
829 version |
830 ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.34 2007-11-07 17:20:03 mb Exp $' |
830 ^ '$Header: /cvs/stx/stx/libtool/Tools_ProjectList.st,v 1.35 2008-05-20 15:28:05 cg Exp $' |
831 ! ! |
831 ! ! |