Subversion Repositories DevTools

Rev

Rev 309 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 309 Rev 315
Line 318... Line 318...
318
    #
318
    #
319
    if ( $reserved )
319
    if ( $reserved )
320
    {
320
    {
321
        m~\(\"(.+)\"\)~;
321
        m~\(\"(.+)\"\)~;
322
        my $view = $1;
322
        my $view = $1;
323
        $view =~ s~/~\\~g unless ( $ENV{GBE_UNIX} );
323
#        $view =~ s~/~\\~g unless ( $ENV{GBE_UNIX} );
324
        Verbose2 ("Reserved checkout: Target View: $view" );
324
        Verbose2 ("Reserved checkout: Target View: $view" );
325
        ClearCmd( 'unreserve', '-comment', 'Unreserved by JATS ABTSAVE', '-view', $view, $opt_ofile );
325
        ClearCmd( 'unreserve', '-comment', 'Unreserved by JATS ABTSAVE', '-view', $view, $opt_ofile );
326
 
326
 
327
        #
327
        #
328
        #   Only one reserved file can exist, so there is no more to do
328
        #   Only one reserved file can exist, so there is no more to do