There is always one more bug

release: "@" must be escaped in Perl strings.
git-archimport-id: mj@ucw.cz--public/pciutils--main--2.2--patch-30

diff --git a/maint/release b/maint/release
index 67dd3692ab5d0d45cf7146ee7f8dda581e7323af..073836d5e7457e276b967d5b65e79adfd4c9b98b 100755 (executable)
--- a/maint/release
+++ b/maint/release
@@ -33,6 +33,6 @@ $r->GenFile("pciutils.lsm");
 $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 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 $?;
 }