bugfixes

diff --git a/evade-mail-admin b/evade-mail-admin
index 5b997bd1bf15fcf280ffd39fbe31d2a132824fe3..dc5e37ef2db5385531c390287242c736c56cf7cc 100755 (executable)
--- 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 01916149835ee28ce3748d85b7573f5559e0f771..9b8c2d258bc147944bacebeaecbc95b1db809696 100755 (executable)
--- 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..."