1 "{ Package: 'cvut:stx/goodies/libsvn' }"

     2 

     3 AbstractSourceCodeManager subclass:#SVNSourceCodeManager

     4 	instanceVariableNames:''

     5 	classVariableNames:''

     6 	poolDictionaries:''

     7 	category:'System-SourceCodeManagement'

     8 !

     9 

    10 !SVNSourceCodeManager class methodsFor:'documentation'!

    11 

    12 documentation

    13 "

    14     For now, this is a dummy SourceCodeManager.

    15     It is only provided to deliver the correct versionMethodNameTemplates

    16     and versionMethod names.

    17 

    18     Might get more in the future.

    19 "

    20 ! !

    21 

    22 !SVNSourceCodeManager class methodsFor:'queries'!

    23 

    24 isExperimental

    25     ^ OperatingSystem getLoginName ~= 'cg'.

    26     ^ true

    27 !

    28 

    29 managerTypeName

    30     ^ 'SVN'

    31 !

    32 

    33 nameOfVersionMethodForExtensions

    34     ^ #'extensionsVersion_SVN'

    35 !

    36 

    37 nameOfVersionMethodInClasses

    38     ^ #'version_SVN'

    39 ! !

    40 

    41 !SVNSourceCodeManager class methodsFor:'testing'!

    42 

    43 isSVN

    44     ^ true

    45 ! !

    46 

    47 !SVNSourceCodeManager class methodsFor:'documentation'!

    48 

    49 version

    50     ^ '$Header$'

    51 !

    52 

    53 version_CVS

    54     ^ '$Header$'

    55 ! !