record email of new users in userinfo for userlist

diff --git a/IkiWiki/CGI.pm b/IkiWiki/CGI.pm
index 6a04decb617571c9a8f6ea6e206663f177bd24de..62383b6fd22cf3ca6bed2dc3571f5cafb3c10715 100644 (file)
--- a/IkiWiki/CGI.pm
+++ b/IkiWiki/CGI.pm
@@ -429,7 +429,7 @@ sub cgi (;$$) {
                        # userinfo db.
                        if (! userinfo_get($session->param("name"), "regdate")) {
                                userinfo_setall($session->param("name"), {
-                                       email => "",
+                                       email => defined $session->param("email") ? $session->param("email") : "",
                                        password => "",
                                        regdate => time,
                                }) || error("failed adding user");