Mercurial > openid

comparison src/ur/openidUser.ur @ 30:5d6337df5ec7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
A silly RPC bug that I'm surprised wasn't caught before now
author Adam Chlipala <adam@chlipala.net>
date Sun, 17 Apr 2011 13:15:10 -0400
parents fcd3a977d77b
children 1be573ac8e2b c0731afcb0c7
comparison
equal deleted inserted replaced
29:35d06874bec4 30:5d6337df5ec7
125 Secure = M.secureCookies}; 125 Secure = M.secureCookies};
126 126
127 dml (insert user ({Id = (SQL {[uid]})} ++ @Sql.sqexps M.folder M.inj cols)); 127 dml (insert user ({Id = (SQL {[uid]})} ++ @Sql.sqexps M.folder M.inj cols));
128 dml (INSERT INTO identity (User, Identifier) 128 dml (INSERT INTO identity (User, Identifier)
129 VALUES ({[uid]}, {[ident]})); 129 VALUES ({[uid]}, {[ident]}));
130 redirect (bless after) 130 return None
131 in 131 in
132 uid <- source ""; 132 uid <- source "";
133 cs <- M.creationState; 133 cs <- M.creationState;
134 134
135 wrap "Your User Details" <xml> 135 wrap "Your User Details" <xml>