Subversion Repositories DevTools

Rev

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

Rev 3347 Rev 4076
Line 348... Line 348...
348
 
348
 
349
    #
349
    #
350
    #   No error and no commit
350
    #   No error and no commit
351
    #   Workspace was not changed, may be allowed
351
    #   Workspace was not changed, may be allowed
352
    #
352
    #
-
 
353
    delete $self->{NoRepoChanges};
353
    if ( ! $self->{REVNO} && $opt{allowSame} )
354
    if ( ! $self->{REVNO} && $opt{allowSame} )
354
    {
355
    {
355
        Warning ("SvnCi: Workspace matches Repository. No commit");
356
        Warning ("SvnCi: Workspace matches Repository. No commit");
356
        $self->{REVNO} = $ws_rev;
357
        $self->{REVNO} = $ws_rev;
-
 
358
        $self->{NoRepoChanges} = 1;
357
    }
359
    }
358
 
360
 
359
    Error ("SvnCi: Cannot determine Revision Number", @{$self->{RESULT_LIST}})
361
    Error ("SvnCi: Cannot determine Revision Number", @{$self->{RESULT_LIST}})
360
        unless ( $self->{REVNO} );
362
        unless ( $self->{REVNO} );
361
 
363
 
Line 1897... Line 1899...
1897
 
1899
 
1898
    #
1900
    #
1899
    #   Execute the command
1901
    #   Execute the command
1900
    #   Appears tp fail random;y - so try a few times
1902
    #   Appears tp fail random;y - so try a few times
1901
    #
1903
    #
-
 
1904
    #Debug ( "setRepoProperty", $name, $value, $self->{REVNO});
1902
    for (my $ii = 0; $ii < 3; $ii++ )
1905
    for (my $ii = 0; $ii < 3; $ii++ )
1903
    {
1906
    {
1904
    $rv = $self->SvnCmd ( 'propset' , $name, '--revprop', '-r',  $self->{REVNO}, $value, $self->Full,
1907
    $rv = $self->SvnCmd ( 'propset' , $name, '--revprop', '-r',  $self->{REVNO}, $value, $self->Full,
1905
                            {
1908
                            {
1906
                                'credentials' => 1,
1909
                                'credentials' => 1,