diff options
author | bbaetz%acm.org <> | 2003-06-03 18:47:37 +0200 |
---|---|---|
committer | bbaetz%acm.org <> | 2003-06-03 18:47:37 +0200 |
commit | 1d057f02b277d29ad4d232d598c49b0344798b40 (patch) | |
tree | 5dd73500b1cf10b51875179f7559c8ec97f0b5be /CGI.pl | |
parent | 3a843833f4ab5d07f10e199daa7ec317e03b9959 (diff) | |
download | bugzilla-1d057f02b277d29ad4d232d598c49b0344798b40.tar.gz bugzilla-1d057f02b277d29ad4d232d598c49b0344798b40.tar.xz |
Bug 180635 - Enhance Bugzilla::User to store additional information
r=myk,jake
Diffstat (limited to 'CGI.pl')
-rw-r--r-- | CGI.pl | 47 |
1 files changed, 0 insertions, 47 deletions
@@ -202,53 +202,6 @@ sub quietly_check_login { return Bugzilla->login($_[0] ? LOGIN_OPTIONAL : LOGIN_NORMAL); } -# Populate a hash with information about this user. -sub GetUserInfo { - my ($userid) = (@_); - my %user; - my @queries; - my %groups; - my @groupids; - - # No info if not logged in - return \%user if ($userid == 0); - - $user{'login'} = $::COOKIE{"Bugzilla_login"}; - $user{'userid'} = $userid; - - SendSQL("SELECT mybugslink, realname " . - "FROM profiles WHERE userid = $userid"); - ($user{'showmybugslink'}, $user{'realname'}) = FetchSQLData(); - - SendSQL("SELECT name, query, linkinfooter FROM namedqueries " . - "WHERE userid = $userid"); - while (MoreSQLData()) { - my %query; - ($query{'name'}, $query{'query'}, $query{'linkinfooter'}) = - FetchSQLData(); - push(@queries, \%query); - } - - $user{'queries'} = \@queries; - - $user{'canblessany'} = UserCanBlessAnything(); - - SendSQL("SELECT DISTINCT id, name FROM groups, user_group_map " . - "WHERE groups.id = user_group_map.group_id " . - "AND user_id = $userid " . - "AND NOT isbless"); - while (MoreSQLData()) { - my ($id, $name) = FetchSQLData(); - push(@groupids,$id); - $groups{$name} = 1; - } - - $user{'groups'} = \%groups; - $user{'groupids'} = \@groupids; - - return \%user; -} - sub CheckEmailSyntax { my ($addr) = (@_); my $match = Param('emailregexp'); |