equal
deleted
inserted
replaced
517 classesToCheckIn add:aClass. |
517 classesToCheckIn add:aClass. |
518 ]. |
518 ]. |
519 |
519 |
520 doExtensions ifTrue:[ |
520 doExtensions ifTrue:[ |
521 aClass isMeta ifFalse:[ |
521 aClass isMeta ifFalse:[ |
522 "/ ... whose class is not in the chechIn-set |
522 "/ ... whose class is not in the checkIn-set |
523 (classesToCheckIn includes:aClass) ifFalse:[ |
523 (classesToCheckIn includes:aClass) ifFalse:[ |
524 aClass instAndClassSelectorsAndMethodsDo:[:sel :mthd | |
524 aClass instAndClassSelectorsAndMethodsDo:[:sel :mthd | |
525 "/ methods in this project ... |
525 "/ methods in this project ... |
526 (mthd package = packageToCheckIn) ifTrue:[ |
526 (mthd package = packageToCheckIn) ifTrue:[ |
527 methodsToCheckIn add:mthd |
527 methodsToCheckIn add:mthd |
565 ^ self. |
565 ^ self. |
566 ]. |
566 ]. |
567 |
567 |
568 checkinInfo validateConsistency ifTrue:[ |
568 checkinInfo validateConsistency ifTrue:[ |
569 self validateConsistencyOfPackage:packageToCheckIn doClasses:doClasses doExtensions:doExtensions. |
569 self validateConsistencyOfPackage:packageToCheckIn doClasses:doClasses doExtensions:doExtensions. |
|
570 "/ could have changed/recompiled methods |
|
571 methodsToCheckIn := packageToCheckIn asPackageId projectDefinitionClass extensionMethods |
570 ]. |
572 ]. |
571 |
573 |
572 (self |
574 (self |
573 checkinExtensionMethods:methodsToCheckIn |
575 checkinExtensionMethods:methodsToCheckIn |
574 forPackage:packageToCheckIn |
576 forPackage:packageToCheckIn |
729 ! ! |
731 ! ! |
730 |
732 |
731 !SourceCodeManagerUtilitiesForContainerBasedManagers class methodsFor:'documentation'! |
733 !SourceCodeManagerUtilitiesForContainerBasedManagers class methodsFor:'documentation'! |
732 |
734 |
733 version |
735 version |
734 ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForContainerBasedManagers.st,v 1.7 2013-03-30 01:55:58 cg Exp $' |
736 ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForContainerBasedManagers.st,v 1.8 2013-03-31 00:27:16 cg Exp $' |
735 ! |
737 ! |
736 |
738 |
737 version_CVS |
739 version_CVS |
738 ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForContainerBasedManagers.st,v 1.7 2013-03-30 01:55:58 cg Exp $' |
740 ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilitiesForContainerBasedManagers.st,v 1.8 2013-03-31 00:27:16 cg Exp $' |
739 ! ! |
741 ! ! |
740 |
742 |