SVN__CleanupCommand.st
author mawalch
Mon, 08 Aug 2016 20:14:05 +0200
changeset 1177 dc7a7fa9bae9
parent 899 38540745b77a
permissions -rw-r--r--
#OTHER by mawalch Fix ridiculously propagated typo.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
703
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     1
"
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     2
 Copyright (c) 2007-2010 Jan Vrany
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     3
 Copyright (c) 2009-2010 eXept Software AG
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     4
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     5
 Permission is hereby granted, free of charge, to any person
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     6
 obtaining a copy of this software and associated documentation
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     7
 files (the 'Software'), to deal in the Software without
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     8
 restriction, including without limitation the rights to use,
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
     9
 copy, modify, merge, publish, distribute, sublicense, and/or sell
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    10
 copies of the Software, and to permit persons to whom the
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    11
 Software is furnished to do so, subject to the following
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    12
 conditions:
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    13
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    14
 The above copyright notice and this permission notice shall be
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    15
 included in all copies or substantial portions of the Software.
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    16
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    17
 THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    18
 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    19
 OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    20
 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    21
 HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    22
 WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    23
 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    24
 OTHER DEALINGS IN THE SOFTWARE.
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    25
"
456
96f374f529a0 *** empty log message ***
fm
parents: 344
diff changeset
    26
"{ Package: 'stx:libsvn' }"
72
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    27
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    28
"{ NameSpace: SVN }"
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    29
492
74ff0960961c *** empty log message ***
fm
parents: 456
diff changeset
    30
WCCommand subclass:#CleanupCommand
72
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    31
	instanceVariableNames:''
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    32
	classVariableNames:''
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    33
	poolDictionaries:''
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    34
	category:'SVN-Private-Commands'
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    35
!
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    36
703
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    37
!CleanupCommand class methodsFor:'documentation'!
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    38
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    39
copyright
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    40
"
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    41
 Copyright (c) 2007-2010 Jan Vrany
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    42
 Copyright (c) 2009-2010 eXept Software AG
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    43
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    44
 Permission is hereby granted, free of charge, to any person
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    45
 obtaining a copy of this software and associated documentation
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    46
 files (the 'Software'), to deal in the Software without
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    47
 restriction, including without limitation the rights to use,
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    48
 copy, modify, merge, publish, distribute, sublicense, and/or sell
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    49
 copies of the Software, and to permit persons to whom the
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    50
 Software is furnished to do so, subject to the following
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    51
 conditions:
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    52
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    53
 The above copyright notice and this permission notice shall be
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    54
 included in all copies or substantial portions of the Software.
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    55
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    56
 THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    57
 EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    58
 OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    59
 NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    60
 HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    61
 WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    62
 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    63
 OTHER DEALINGS IN THE SOFTWARE.
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    64
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    65
"
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    66
! !
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    67
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    68
!CleanupCommand class methodsFor:'others'!
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    69
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    70
version_CVS
899
38540745b77a checkin to get version methods correct
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 703
diff changeset
    71
    ^ '$Header$'
703
37bdce7857ed Updates from SVN
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 492
diff changeset
    72
! !
72
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    73
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    74
!CleanupCommand methodsFor:'executing'!
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    75
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    76
execute
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    77
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    78
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    79
    ^self svnExecute
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    80
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    81
    "Created: / 08-11-2008 / 08:14:56 / Jan Vrany <vranyj1@fel.cvut.cz>"
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    82
! !
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    83
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    84
!CleanupCommand methodsFor:'executing - private'!
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    85
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    86
svnCmd
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    87
    "raise an error: must be redefined in concrete subclass(es)"
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    88
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    89
    ^'cleanup'
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    90
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    91
    "Created: / 08-11-2008 / 08:12:02 / Jan Vrany <vranyj1@fel.cvut.cz>"
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    92
! !
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    93
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    94
!CleanupCommand class methodsFor:'documentation'!
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    95
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
    96
version
899
38540745b77a checkin to get version methods correct
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 703
diff changeset
    97
    ^ '$Header$'
151
20c67b4b2ac4 changed: #version_SVN
fm
parents: 72
diff changeset
    98
!
20c67b4b2ac4 changed: #version_SVN
fm
parents: 72
diff changeset
    99
20c67b4b2ac4 changed: #version_SVN
fm
parents: 72
diff changeset
   100
version_SVN
899
38540745b77a checkin to get version methods correct
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 703
diff changeset
   101
    ^ '§Id: SVN__CleanupCommand.st 362 2011-08-08 13:07:42Z vranyj1 §'
72
877b3f3d2fb1 initial checkin
fm
parents:
diff changeset
   102
! !