From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 5 Sep 2013 00:16:16 +0000 (+0100)
Subject: bugfixes
X-Git-Tag: test~15
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?p=d.git;a=commitdiff_plain;h=a0ebd46160d051781f555d63a7707950df31d8cd

bugfixes
---

diff --git a/evade-mail-admin b/evade-mail-admin
index 5b997bd..dc5e37e 100755
--- a/evade-mail-admin
+++ b/evade-mail-admin
@@ -320,6 +320,7 @@ sub action_create {
 
 sub action_choose {
     genopts;
+    $|=1;
     my $template = rhsargs({'redirect'=>$user, 'comment'=>''});
     $template->{'user'} = $user;
     prepare_create();
@@ -350,6 +351,7 @@ sub action_choose {
 	    1;
 	}) {
 	    my $newrow = { %$template, 'localpart' => $s };
+	    insertrow($newrow);
 	    $dbh->commit();
 	    prow($newrow);
 	} else {
diff --git a/evade-mail-generic b/evade-mail-generic
index 0191614..9b8c2d2 100755
--- a/evade-mail-generic
+++ b/evade-mail-generic
@@ -1,7 +1,7 @@
 #!/bin/sh
 set -e
 us=$1; shift
-domain=$2; shift
+domain=$1; shift
 case "$#.$1" in
 0.|1.-h)
 	echo "usage: $us ACTION ARG..."