make-windows-releases attach suffix to ZIP archive name

This commit is contained in:
Jonathan Campbell 2018-03-08 09:50:53 -08:00
parent d2765ba8a8
commit 231d6904bc

View File

@ -1,14 +1,9 @@
#!/usr/bin/perl
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
my $datestr = sprintf("%04u%02u%02u-%02u%02u%02u",$year+1900,$mon+1,$mday,$hour,$min,$sec);
my $zipname = "dosbox-x-windows-$datestr.zip";
my $ziptool = "vs2015/tool/zip.exe";
exit 0 if -f $zipname;
die unless -f $ziptool;
my $subdir="release/windows";
my $brancha=`git branch`;
@ -28,11 +23,18 @@ if ( "$branch" eq "develop-win-sdl1-async-hack-201802" ) {
$subdir="release/windows-async";
}
$suffix = $subdir;
$suffix =~ s/^.*\///g;
mkdir "release" unless -d "release";
mkdir "$subdir" unless -d "$subdir";
die "bin directory not exist" unless -d "bin";
my $zipname = "dosbox-x-windows-$datestr-$suffix.zip";
exit 0 if -f $zipname;
die unless -f $ziptool;
print "$zipname\n";
my @filelist = ();