equal
deleted
inserted
replaced
467 |
467 |
468 "Modified: 19.9.1997 / 06:09:40 / cg" |
468 "Modified: 19.9.1997 / 06:09:40 / cg" |
469 "Created: 19.9.1997 / 06:13:06 / cg" |
469 "Created: 19.9.1997 / 06:13:06 / cg" |
470 ! |
470 ! |
471 |
471 |
|
472 repositoryNameForPackage:packageId |
|
473 "superclass AbstractSourceCodeManager class says that I am responsible to implement this method" |
|
474 |
|
475 ^ self getCVSROOTForModule:(packageId upTo:$:) |
|
476 "Created: / 10-10-2011 / 19:44:51 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
477 ! |
|
478 |
472 repositoryNamesPerModule |
479 repositoryNamesPerModule |
473 <resource: #obsolete> |
480 <resource: #obsolete> |
474 "return the dictionary, which associates CVSRoots to module names. |
481 "return the dictionary, which associates CVSRoots to module names. |
475 If no entry is contained in this dictionary for some module, |
482 If no entry is contained in this dictionary for some module, |
476 the default cvsRoot (CVSRoot) will be used." |
483 the default cvsRoot (CVSRoot) will be used." |
485 If no entry is contained in this dictionary for some module, |
492 If no entry is contained in this dictionary for some module, |
486 the default cvsRoot (CVSRoot) will be used." |
493 the default cvsRoot (CVSRoot) will be used." |
487 |
494 |
488 self obsoleteMethodWarning:'use repositoryInfoPerModule:'. |
495 self obsoleteMethodWarning:'use repositoryInfoPerModule:'. |
489 CVSModuleRoots := aDictionary |
496 CVSModuleRoots := aDictionary |
490 ! |
|
491 |
|
492 repositoryStringForPackage:packageId |
|
493 "superclass AbstractSourceCodeManager class says that I am responsible to implement this method" |
|
494 |
|
495 ^self getCVSROOTForModule: ( packageId upTo:$:) |
|
496 |
|
497 "Created: / 10-10-2011 / 19:44:51 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
498 ! ! |
497 ! ! |
499 |
498 |
500 !CVSSourceCodeManager class methodsFor:'basic administration'! |
499 !CVSSourceCodeManager class methodsFor:'basic administration'! |
501 |
500 |
502 createContainerFor:aClass inModule:moduleName directory:dirName container:fileName |
501 createContainerFor:aClass inModule:moduleName directory:dirName container:fileName |
5033 ! ! |
5032 ! ! |
5034 |
5033 |
5035 !CVSSourceCodeManager class methodsFor:'documentation'! |
5034 !CVSSourceCodeManager class methodsFor:'documentation'! |
5036 |
5035 |
5037 version |
5036 version |
5038 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.406 2011-10-11 11:51:02 vrany Exp $' |
5037 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.407 2011-10-12 21:06:17 vrany Exp $' |
5039 ! |
5038 ! |
5040 |
5039 |
5041 version_CVS |
5040 version_CVS |
5042 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.406 2011-10-11 11:51:02 vrany Exp $' |
5041 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.407 2011-10-12 21:06:17 vrany Exp $' |
5043 ! ! |
5042 ! ! |
5044 |
5043 |
5045 CVSSourceCodeManager initialize! |
5044 CVSSourceCodeManager initialize! |