Subversion Repositories DevTools

Rev

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

Rev 7299 Rev 7300
Line 1... Line 1...
1 
########################################################################
 1 
########################################################################
2 
# Copyright (c) VIX TECHNOLOGY (AUST) LTD
 2 
# COPYRIGHT - VIX IP PTY LTD ("VIX"). ALL RIGHTS RESERVED.
3 
#
 3 
#
4 
# Module name   : jats_svnrelease.pl
 4 
# Module name   : jats_svnrelease.pl
5 
# Module type   : Jats Utility
 5 
# Module type   : Jats Utility
6 
# Compiler(s)   : Perl
 6 
# Compiler(s)   : Perl
7 
# Environment(s): Jats
 7 
# Environment(s): Jats
Line 686... Line 686...
686 
                               $workSpace,
 686 
                               $workSpace,
687 
                               '--NoPrint' );
 687 
                               '--NoPrint' );
688 
    }
 688 
    }
689 
 
 689 
 
690 
    #
 690 
    #
691 
    #   Create a local package archive
 - 
 
692 
    #   May be needed for multipackage builds and it will prevent JATS from
 - 
 
693 
    #   finding any outside the view
 - 
 
694 
    #
 - 
 
695 
    mkdir ( $VIEWDIR . '/local_dpkg_archive')
 - 
 
696 
        unless ($GBE_SANDBOX);
 - 
 
697 
 
 - 
 
698 
    #
 - 
 
699 
    #   Display messages AFTER the extraction text
 691 
    #   Display messages AFTER the extraction text
700 
    #   Will ensure that the user has a chance to see them
 692 
    #   Will ensure that the user has a chance to see them
701 
    #
 693 
    #
702 
    Warning(@messageText );
 694 
    Warning(@messageText );
703
695
Line 1145... Line 1137...
1145 
 
 1137 
 
1146 
    $svnSession->SvnCo ( $svnSession->FullPath() . '/' . $view_tag,
 1138 
    $svnSession->SvnCo ( $svnSession->FullPath() . '/' . $view_tag,
1147 
                        $VIEWDIR,
 1139 
                        $VIEWDIR,
1148 
                        'export' => 1,
 1140 
                        'export' => 1,
1149 
                        'escrow' => $opt_escrow,
 1141 
                        'escrow' => $opt_escrow,
1150 
                        'print' => 0 );
 1142 
                        'print'  => ($GBE_ABT ? 1 : 0) );
1151 
 
 1143 
 
1152 
    #
 1144 
    #
1153 
    #   Count this files in the view
 1145 
    #   Count this files in the view
1154 
    #   Done so that its clear when we have a empty workspace in escrow extractions
 1146 
    #   Done so that its clear when we have a empty workspace in escrow extractions
1155 
    #
 1147 
    #