Change granter.sh to give permissions to user specified on command line

[hcoop/zz_old/portal.git] / request.sml

diff --git a/request.sml b/request.sml
index 738c341..ed48c2a 100644 (file)
--- a/request.sml
+++ b/request.sml
@@ -97,6 +97,7 @@ fun notify f req =
                    ()
                else
                    (Mail.mwrite (mail, name);
+                    Mail.mwrite (mail, emailSuffix);
                     Mail.mwrite (mail, ","))
            end
          | doOne r = rowError (table ^ ".doOne", r)