Subversion Repositories DevTools

Rev

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

Rev 275 Rev 277
Line 110... Line 110...
110 
#
 110 
#
111 
 
 111 
 
112 
Message "Create package image: $opt_package";
 112 
Message "Create package image: $opt_package";
113 
CreateDir ($opt_package, 'DeleteFirst' => 1 );
 113 
CreateDir ($opt_package, 'DeleteFirst' => 1 );
114 
 
 114 
 
115 
for my $dir (glob ("$opt_root/BIN.*" ))
 - 
 
116 
{
 115 
 
117 
    Message "Copy in: $dir";
 116 
Message "Copy in: BIN dirs";
118 
    CopyDir ( $dir, $opt_package, 'KeepSrcTail' => 1 );
 117 
CopyDir ( $opt_root, $opt_package, 'MatchDirs' => ['BIN.*'], 'SkipTLF' => 1 );
119 
}
 - 
 
120 
 
 118 
 
121 
for my $dir qw(CFG TEMPLATES TOOLS)
 119 
for my $dir qw(CFG TEMPLATES TOOLS)
122 
{
 120 
{
123 
    Message "Copy in: $dir";
 121 
    Message "Copy in: $dir";
124 
    CopyDir ( "$opt_root/$dir", $opt_package,
 122 
    CopyDir ( "$opt_root/$dir", $opt_package,