Subversion Repositories DevTools

Rev

Rev 361 | Rev 1329 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 361 Rev 375
Line 273... Line 273...
273 
 
 273 
 
274 
    if ( $opt_isa_wip )
 274 
    if ( $opt_isa_wip )
275 
    {
 275 
    {
276 
        #
 276 
        #
277 
        #   If the build is based on a WIP, then we can delete the
 277 
        #   If the build is based on a WIP, then we can delete the
278 
        #   WIP if its based on a branch
 278 
        #   WIP if its based on a branch. If its a TAG, then only delete it if
- 
 
 279 
        #   the LABEL is a true WIP and not an existing tag.
279 
        #
 280 
        #
280 
        if ( $session->WsType eq 'branches' )
 281 
        if ( $session->WsType eq 'branches' || $opt_baselabel =~ m/\.WIP(\@\d+)?$/)
281 
        {
 282 
        {
282 
            $session->SvnDelete(
 283 
            $session->SvnDelete(
283 
                    'target'  => $session->FullWs,
 284 
                    'target'  => $session->FullWs,
284 
                    'comment' => ["Deleted by Jats SaveBuild","Replaced by: $tag_label"],
 285 
                    'comment' => ["Deleted by Jats SaveBuild","Replaced by: $tag_label"],
285 
                    'noerror' => 1,
 286 
                    'noerror' => 1,