SVN__CreateRepositoryCommand.st
author Merge Script
Sat, 19 Nov 2016 06:53:11 +0100
branchjv
changeset 1182 38600a7a9203
parent 859 0f4bea7ae9c5
permissions -rw-r--r--
Merge
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
689
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     1
"
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     2
 Copyright (c) 2007-2010 Jan Vrany
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     3
 Copyright (c) 2009-2010 eXept Software AG
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     4
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     5
 Permission is hereby granted, free of charge, to any person
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     6
 obtaining a copy of this software and associated documentation
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     7
 files (the 'Software'), to deal in the Software without
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     8
 restriction, including without limitation the rights to use,
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
     9
 copy, modify, merge, publish, distribute, sublicense, and/or sell
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    10
 copies of the Software, and to permit persons to whom the
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    11
 Software is furnished to do so, subject to the following
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    12
 conditions:
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    13
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    14
 The above copyright notice and this permission notice shall be
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    15
 included in all copies or substantial portions of the Software.
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    16
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    17
 THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    18
 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    19
 OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    20
 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    21
 HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    22
 WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    23
 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    24
 OTHER DEALINGS IN THE SOFTWARE.
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    25
"
471
b0a3517e2a98 *** empty log message ***
fm
parents: 298
diff changeset
    26
"{ Package: 'stx:libsvn' }"
53
a7875586d7ac initial checkin
fm
parents:
diff changeset
    27
a7875586d7ac initial checkin
fm
parents:
diff changeset
    28
"{ NameSpace: SVN }"
a7875586d7ac initial checkin
fm
parents:
diff changeset
    29
a7875586d7ac initial checkin
fm
parents:
diff changeset
    30
Command subclass:#CreateRepositoryCommand
a7875586d7ac initial checkin
fm
parents:
diff changeset
    31
	instanceVariableNames:'repositoryPath'
a7875586d7ac initial checkin
fm
parents:
diff changeset
    32
	classVariableNames:''
a7875586d7ac initial checkin
fm
parents:
diff changeset
    33
	poolDictionaries:''
a7875586d7ac initial checkin
fm
parents:
diff changeset
    34
	category:'SVN-Private-Commands'
a7875586d7ac initial checkin
fm
parents:
diff changeset
    35
!
a7875586d7ac initial checkin
fm
parents:
diff changeset
    36
689
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    37
!CreateRepositoryCommand class methodsFor:'documentation'!
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    38
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    39
copyright
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    40
"
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    41
 Copyright (c) 2007-2010 Jan Vrany
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    42
 Copyright (c) 2009-2010 eXept Software AG
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    43
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    44
 Permission is hereby granted, free of charge, to any person
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    45
 obtaining a copy of this software and associated documentation
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    46
 files (the 'Software'), to deal in the Software without
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    47
 restriction, including without limitation the rights to use,
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    48
 copy, modify, merge, publish, distribute, sublicense, and/or sell
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    49
 copies of the Software, and to permit persons to whom the
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    50
 Software is furnished to do so, subject to the following
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    51
 conditions:
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    52
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    53
 The above copyright notice and this permission notice shall be
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    54
 included in all copies or substantial portions of the Software.
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    55
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    56
 THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    57
 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    58
 OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    59
 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    60
 HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    61
 WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    62
 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    63
 OTHER DEALINGS IN THE SOFTWARE.
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    64
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    65
"
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    66
! !
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    67
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    68
!CreateRepositoryCommand class methodsFor:'others'!
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    69
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    70
version_CVS
859
0f4bea7ae9c5 checkin to get version methods correct
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 689
diff changeset
    71
    ^ '$Header$'
689
012f2a40803d Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 471
diff changeset
    72
! !
53
a7875586d7ac initial checkin
fm
parents:
diff changeset
    73
a7875586d7ac initial checkin
fm
parents:
diff changeset
    74
!CreateRepositoryCommand methodsFor:'accessing'!
a7875586d7ac initial checkin
fm
parents:
diff changeset
    75
a7875586d7ac initial checkin
fm
parents:
diff changeset
    76
repositoryPath
a7875586d7ac initial checkin
fm
parents:
diff changeset
    77
    ^ repositoryPath
a7875586d7ac initial checkin
fm
parents:
diff changeset
    78
!
a7875586d7ac initial checkin
fm
parents:
diff changeset
    79
a7875586d7ac initial checkin
fm
parents:
diff changeset
    80
repositoryPath:aString
a7875586d7ac initial checkin
fm
parents:
diff changeset
    81
    repositoryPath := aString.
a7875586d7ac initial checkin
fm
parents:
diff changeset
    82
! !
a7875586d7ac initial checkin
fm
parents:
diff changeset
    83
a7875586d7ac initial checkin
fm
parents:
diff changeset
    84
!CreateRepositoryCommand methodsFor:'executing - private'!
a7875586d7ac initial checkin
fm
parents:
diff changeset
    85
a7875586d7ac initial checkin
fm
parents:
diff changeset
    86
svnCmd
a7875586d7ac initial checkin
fm
parents:
diff changeset
    87
    "raise an error: must be redefined in concrete subclass(es)"
a7875586d7ac initial checkin
fm
parents:
diff changeset
    88
a7875586d7ac initial checkin
fm
parents:
diff changeset
    89
    ^'create'
a7875586d7ac initial checkin
fm
parents:
diff changeset
    90
a7875586d7ac initial checkin
fm
parents:
diff changeset
    91
    "Modified: / 08-04-2009 / 20:36:48 / Jan Vrany <vranyj1@fel.cvut.cz>"
a7875586d7ac initial checkin
fm
parents:
diff changeset
    92
!
a7875586d7ac initial checkin
fm
parents:
diff changeset
    93
a7875586d7ac initial checkin
fm
parents:
diff changeset
    94
svnCmdArgumentsOn:argStream
a7875586d7ac initial checkin
fm
parents:
diff changeset
    95
    "raise an error: must be redefined in concrete subclass(es)"
a7875586d7ac initial checkin
fm
parents:
diff changeset
    96
a7875586d7ac initial checkin
fm
parents:
diff changeset
    97
    argStream nextPut: repositoryPath
a7875586d7ac initial checkin
fm
parents:
diff changeset
    98
a7875586d7ac initial checkin
fm
parents:
diff changeset
    99
    "Modified: / 08-04-2009 / 21:36:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
a7875586d7ac initial checkin
fm
parents:
diff changeset
   100
!
a7875586d7ac initial checkin
fm
parents:
diff changeset
   101
a7875586d7ac initial checkin
fm
parents:
diff changeset
   102
svnGlobalArgumentsOn: argStream
a7875586d7ac initial checkin
fm
parents:
diff changeset
   103
a7875586d7ac initial checkin
fm
parents:
diff changeset
   104
    "No global arguments"
a7875586d7ac initial checkin
fm
parents:
diff changeset
   105
a7875586d7ac initial checkin
fm
parents:
diff changeset
   106
    "Created: / 08-04-2009 / 20:38:41 / Jan Vrany <vranyj1@fel.cvut.cz>"
a7875586d7ac initial checkin
fm
parents:
diff changeset
   107
!
a7875586d7ac initial checkin
fm
parents:
diff changeset
   108
a7875586d7ac initial checkin
fm
parents:
diff changeset
   109
svnProcessCommandOutput:svnStdoutStream err:svnStderrStream
a7875586d7ac initial checkin
fm
parents:
diff changeset
   110
a7875586d7ac initial checkin
fm
parents:
diff changeset
   111
    "Nothing to do"
a7875586d7ac initial checkin
fm
parents:
diff changeset
   112
a7875586d7ac initial checkin
fm
parents:
diff changeset
   113
    "Modified: / 08-04-2009 / 20:38:13 / Jan Vrany <vranyj1@fel.cvut.cz>"
a7875586d7ac initial checkin
fm
parents:
diff changeset
   114
!
a7875586d7ac initial checkin
fm
parents:
diff changeset
   115
a7875586d7ac initial checkin
fm
parents:
diff changeset
   116
svnProgram
a7875586d7ac initial checkin
fm
parents:
diff changeset
   117
a7875586d7ac initial checkin
fm
parents:
diff changeset
   118
    ^'svnadmin'
a7875586d7ac initial checkin
fm
parents:
diff changeset
   119
a7875586d7ac initial checkin
fm
parents:
diff changeset
   120
    "Created: / 08-04-2009 / 20:36:18 / Jan Vrany <vranyj1@fel.cvut.cz>"
a7875586d7ac initial checkin
fm
parents:
diff changeset
   121
! !
a7875586d7ac initial checkin
fm
parents:
diff changeset
   122
a7875586d7ac initial checkin
fm
parents:
diff changeset
   123
!CreateRepositoryCommand class methodsFor:'documentation'!
a7875586d7ac initial checkin
fm
parents:
diff changeset
   124
a7875586d7ac initial checkin
fm
parents:
diff changeset
   125
version
859
0f4bea7ae9c5 checkin to get version methods correct
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 689
diff changeset
   126
    ^ '$Header$'
174
48fd0bc09710 changed: #version_SVN
fm
parents: 53
diff changeset
   127
!
48fd0bc09710 changed: #version_SVN
fm
parents: 53
diff changeset
   128
48fd0bc09710 changed: #version_SVN
fm
parents: 53
diff changeset
   129
version_SVN
859
0f4bea7ae9c5 checkin to get version methods correct
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 689
diff changeset
   130
    ^ '§Id: SVN__CreateRepositoryCommand.st 362 2011-08-08 13:07:42Z vranyj1 §'
53
a7875586d7ac initial checkin
fm
parents:
diff changeset
   131
! !