DataBaseSourceCodeManager.st
branchjv
changeset 4086 aafed7101969
parent 3838 474d8ec95b33
parent 4083 9139523ea829
child 4166 66a7a47f9253
equal deleted inserted replaced
4081:5a9726876c20 4086:aafed7101969
     9  other person.  No title to or ownership of the software is
     9  other person.  No title to or ownership of the software is
    10  hereby transferred.
    10  hereby transferred.
    11 "
    11 "
    12 "{ Package: 'stx:libbasic3' }"
    12 "{ Package: 'stx:libbasic3' }"
    13 
    13 
       
    14 "{ NameSpace: Smalltalk }"
       
    15 
    14 AbstractSourceCodeManager subclass:#DataBaseSourceCodeManager
    16 AbstractSourceCodeManager subclass:#DataBaseSourceCodeManager
    15 	instanceVariableNames:''
    17 	instanceVariableNames:''
    16 	classVariableNames:'Verbose RepositoryName ModuleDBs CachedDBHandles'
    18 	classVariableNames:'Verbose RepositoryName ModuleDBs CachedDBHandles'
    17 	poolDictionaries:''
    19 	poolDictionaries:''
    18 	category:'System-SourceCodeManagement'
    20 	category:'System-SourceCodeManagement'
    77 
    79 
    78     "Modified: / 26-12-2011 / 00:48:51 / cg"
    80     "Modified: / 26-12-2011 / 00:48:51 / cg"
    79 !
    81 !
    80 
    82 
    81 repositoryInfoPerModule
    83 repositoryInfoPerModule
    82     "return the dictionary, which associates repository pathes to module names.
    84     "return the dictionary, which associates repository paths to module names.
    83      If no entry is contained in this dictionary for some module,
    85      If no entry is contained in this dictionary for some module,
    84      the default path will be used."
    86      the default path will be used."
    85 
    87 
    86     ^ ModuleDBs ? #()
    88     ^ ModuleDBs ? #()
    87 !
    89 !
    88 
    90 
    89 repositoryInfoPerModule:aDictionary
    91 repositoryInfoPerModule:aDictionary
    90     "set the dictionary, which associates repository pathes to module names.
    92     "set the dictionary, which associates repository paths to module names.
    91      If no entry is contained in this dictionary for some module,
    93      If no entry is contained in this dictionary for some module,
    92      the default path will be used."
    94      the default path will be used."
    93 
    95 
    94     ModuleDBs := aDictionary
    96     ModuleDBs := aDictionary
    95 !
    97 !
   752 ! !
   754 ! !
   753 
   755 
   754 !DataBaseSourceCodeManager class methodsFor:'documentation'!
   756 !DataBaseSourceCodeManager class methodsFor:'documentation'!
   755 
   757 
   756 version
   758 version
   757     ^ '$Header: /cvs/stx/stx/libbasic3/DataBaseSourceCodeManager.st,v 1.15 2014-12-01 12:49:09 cg Exp $'
   759     ^ '$Header$'
   758 !
   760 !
   759 
   761 
   760 version_CVS
   762 version_CVS
   761     ^ '$Header: /cvs/stx/stx/libbasic3/DataBaseSourceCodeManager.st,v 1.15 2014-12-01 12:49:09 cg Exp $'
   763     ^ '$Header$'
   762 ! !
   764 ! !
   763 
   765