Fixed some more stuff.. No more getuuid for normal users!

[irc/SurrealServices/srsv.git] / branches / 0.5.0 / modules / serviceslibs / adminserv.pm

diff --git a/branches/0.5.0/modules/serviceslibs/adminserv.pm b/branches/0.5.0/modules/serviceslibs/adminserv.pm
index d2473cbbcee2ab7340f38b1dfb6f2b460596aed9..b2ba094b11b9ec0d490ea9a1c51ab0da27c9587f 100644 (file)
--- a/branches/0.5.0/modules/serviceslibs/adminserv.pm
+++ b/branches/0.5.0/modules/serviceslibs/adminserv.pm
@@ -90,6 +90,7 @@ our (
 );
 
 sub init() {
+       $asuser = { NICK => $asnick, ID => ircd::getAgentUuid($asnick) };
        $create_svsop = $dbh->prepare("INSERT IGNORE INTO svsop SELECT id, NULL, NULL FROM nickreg WHERE nick=?");
        $delete_svsop = $dbh->prepare("DELETE FROM svsop USING svsop, nickreg WHERE nickreg.nick=? AND svsop.nrid=nickreg.id");