Subversion Repositories DevTools

Rev

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

Rev 361 Rev 363
Line 28... Line 28...
28 
use JatsError;
 28 
use JatsError;
29 
use JatsSystem;
 29 
use JatsSystem;
30 
use FileUtils;
 30 
use FileUtils;
31 
use JatsCopy;
 31 
use JatsCopy;
32 
 
 32 
 
- 
 
 33 
#
- 
 
 34 
#   Set the perl library search path so that this script will use the tools
- 
 
 35 
#   being released by this vesrion of JATS and not the one under which it
- 
 
 36 
#   is being built.
- 
 
 37 
#
- 
 
 38 
use FindBin;                                    # Determine the current directory
- 
 
 39 
use lib "$FindBin::Bin/../TOOLS/LIB";           # Build under this version
- 
 
 40 
 
33 
my $VERSION = "1.0.0";
 41 
my $VERSION = "1.0.0";
34 
my $opt_help = 0;
 42 
my $opt_help = 0;
35 
my $opt_manual = 0;
 43 
my $opt_manual = 0;
36 
my $opt_buildname;
 44 
my $opt_buildname;
37 
my $opt_buildversion;
 45 
my $opt_buildversion;