]> mj.ucw.cz Git - pciutils.git/blobdiff - maint/release
Added more parts of the Windows port.
[pciutils.git] / maint / release
index 67dd3692ab5d0d45cf7146ee7f8dda581e7323af..778e6b3d65f481c356e32b97f24366913ca151b4 100755 (executable)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 # A simple script for making releases of the pciutils
-# (c) 2003 Martin Mares <mj@ucw.cz>
+# (c) 2003--2004 Martin Mares <mj@ucw.cz>
 
 use strict;
 use warnings;
@@ -19,7 +19,7 @@ if ($ver =~ /-/) {
 push @{$r->{"uploads"}}, {
        "url" => "scp://atrey.karlin.mff.cuni.cz/~ftp/pub/linux/pci/" . $r->{"ALPHADIR"}
        },{
-       "url" => "scp://master.kernel.org/~ftp/pub/software/utils/pciutils/" . $r->{"ALPHADIR"}
+       "url" => "scp://master.kernel.org/pub/software/utils/pciutils/" . $r->{"ALPHADIR"}
        };
 push @{$r->{"uploads"}}, {
        "url" => "ftp://metalab.unc.edu/incoming/linux/",
@@ -30,9 +30,10 @@ $r->InitDist("maint/dist");
 my $reldir = $r->GenPackage;
 $r->GenFile("README");
 $r->GenFile("pciutils.lsm");
+$r->GenFile("win32/config.h");
 $r->Dispatch;
 if ($r->{"do_upload"}) {
        print "Uploading pci.ids to Jabberwock\n";
-       `scp pci.ids pciids@jabberwock.ucw.cz:05-pciutils.new`; die if $?;
-       `ssh pciids@jabberwock.ucw.cz mv 05-pciutils.new origs/05-pciutils`; die if $?;
+       `scp -C pci.ids pciids\@jabberwock.ucw.cz:05-pciutils.new`; die if $?;
+       `ssh pciids\@jabberwock.ucw.cz mv 05-pciutils.new origs/05-pciutils`; die if $?;
 }