Subversion Repositories DevTools

Rev

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

Rev 363 Rev 369
Line 129... Line 129...
129 
 
 129 
 
130 
 
 130 
 
131 
Message "Copy in: BIN dirs";
 131 
Message "Copy in: BIN dirs";
132 
CopyDir ( $opt_root, $opt_package, 'MatchDirs' => ['BIN.*'], 'SkipTLF' => 1 );
 132 
CopyDir ( $opt_root, $opt_package, 'MatchDirs' => ['BIN.*'], 'SkipTLF' => 1 );
133 
 
 133 
 
134 
for my $dir qw(CFG TEMPLATES TOOLS HTML)
 134 
for my $dir (qw(CFG TEMPLATES TOOLS HTML))
135 
{
 135 
{
136 
    Message "Copy in: $dir";
 136 
    Message "Copy in: $dir";
137 
    CopyDir ( "$opt_root/$dir", $opt_package,
 137 
    CopyDir ( "$opt_root/$dir", $opt_package,
138 
                'IgnoreDirs' => ['LOCAL', 'JatsDocTools'],
 138 
                'IgnoreDirs' => ['LOCAL', 'JatsDocTools'],
139 
                'KeepSrcTail' => 1);
 139 
                'KeepSrcTail' => 1);
140 
}
 140 
}
141 
 
 141 
 
142 
for my $file qw(Readme.txt ChangeLog.txt)
 142 
for my $file (qw(Readme.txt ChangeLog.txt))
143 
{
 143 
{
144 
    Message "Copy in: $file";
 144 
    Message "Copy in: $file";
145 
    CopyFile ( "$opt_root/$file", $opt_package );
 145 
    CopyFile ( "$opt_root/$file", $opt_package );
146 
}
 146 
}
147 
 
 147 
 
148 
for my $file qw(PostInstall.sh)
 148 
for my $file (qw(PostInstall.sh))
149 
{
 149 
{
150 
    Message "Copy in: $file";
 150 
    Message "Copy in: $file";
151 
    CopyFile ( $file, $opt_package );
 151 
    CopyFile ( $file, $opt_package );
152 
}
 152 
}
153 
 
 153 
 
154 
#
 154 
#
155 
#   Update version info in some files
 155 
#   Update version info in some files
156 
#
 156 
#
157 
foreach my $file qw( TOOLS/jats.sh TOOLS/jats.bat TOOLS/jats.pl )
 157 
foreach my $file (qw( TOOLS/jats.sh TOOLS/jats.bat TOOLS/jats.pl ))
158 
{
 158 
{
159 
    Message "Insert version into: $file";
 159 
    Message "Insert version into: $file";
160 
    my @opts;
 160 
    my @opts;
161 
    push @opts, ( $file =~ m~\.bat$~ ? '-dos' : '-unix' );
 161 
    push @opts, ( $file =~ m~\.bat$~ ? '-dos' : '-unix' );
162 
    unlink "$opt_package/$file";
 162 
    unlink "$opt_package/$file";