equal
deleted
inserted
replaced
90 If the argument, aLogInfoOrNil isNil, ask interactively for log-message. |
90 If the argument, aLogInfoOrNil isNil, ask interactively for log-message. |
91 If doCheckClass is true, the class is checked for send of halts etc." |
91 If doCheckClass is true, the class is checked for send of halts etc." |
92 |
92 |
93 |logMessage checkinInfo mgr pri doSubmit| |
93 |logMessage checkinInfo mgr pri doSubmit| |
94 |
94 |
95 resources := self classResources. |
|
96 doSubmit := false. |
95 doSubmit := false. |
97 |
96 |
98 aClass isLoaded ifFalse:[ |
97 aClass isLoaded ifFalse:[ |
99 self information:(resources string:'Cannot checkin unloaded classes (%1)' with:aClass name). |
98 self information:(resources string:'Cannot checkin unloaded classes (%1)' with:aClass name). |
100 ^ false. |
99 ^ false. |
3563 ! ! |
3562 ! ! |
3564 |
3563 |
3565 !PerforceSourceCodeManagerUtilities class methodsFor:'documentation'! |
3564 !PerforceSourceCodeManagerUtilities class methodsFor:'documentation'! |
3566 |
3565 |
3567 version |
3566 version |
3568 ^ '$Id: PerforceSourceCodeManagerUtilities.st 8008 2012-06-17 08:45:40Z vranyj1 $' |
3567 ^ '$Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagerUtilities.st,v 1.2 2012/10/30 14:33:38 cg Exp $' |
3569 ! |
3568 ! |
3570 |
3569 |
3571 version_CVS |
3570 version_CVS |
3572 ^ '§Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagerUtilities.st,v 1.1 2012/06/01 09:16:03 cg Exp §' |
3571 ^ '§Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagerUtilities.st,v 1.2 2012/10/30 14:33:38 cg Exp §' |
3573 ! |
3572 ! |
3574 |
3573 |
3575 version_SVN |
3574 version_SVN |
3576 ^ '$Id:: PerforceSourceCodeManagerUtilities.st 8008 2012-06-17 08:45:40Z vranyj1 $' |
3575 ^ '$Id:: PerforceSourceCodeManagerUtilities.st 8074 2012-11-30 17:23:39Z vranyj1 $' |
3577 ! ! |
3576 ! ! |