Skip to content

bugzilla
bugzilla
Commit 49e0af3d authored by dave%intrec.com's avatar dave%intrec.com
Browse files
Options

Fix for bug 31336 (separate bug groups from access groups in user editor)

parent 16488acd
Hide whitespace changes
Inline Side-by-side
Showing with 43 additions and 8 deletions
editusers.cgi
View file @ 49e0af3d
...@@ -19,7 +19,7 @@ ...@@ -19,7 +19,7 @@
# Rights Reserved. # Rights Reserved.
# #
# Contributor(s): Holger Schurig <holgerschurig@nikocity.de> # Contributor(s): Holger Schurig <holgerschurig@nikocity.de>
# # Dave Miller <dave@intrec.com>
# #
# Direct any questions on this source code to # Direct any questions on this source code to
# #
...@@ -139,21 +139,56 @@ sub EmitFormElements ($$$$$$$) ...@@ -139,21 +139,56 @@ sub EmitFormElements ($$$$$$$)
SendSQL("SELECT bit,name,description,bit & $groupset != 0, " . SendSQL("SELECT bit,name,description,bit & $groupset != 0, " .
" bit & $blessgroupset " . " bit & $blessgroupset " .
"FROM groups " . "FROM groups " .
"WHERE bit & $opblessgroupset != 0 " . "WHERE bit & $opblessgroupset != 0 AND isbuggroup " .
"ORDER BY name"); "ORDER BY name");
print "</TR><TR><TH VALIGN=TOP ALIGN=RIGHT>Group Access:</TH><TD><TABLE><TR>";
my $curgrouptype = 1;
if (MoreSQLData()) {
if ($editall) {
print "<TD COLSPAN=3 ALIGN=LEFT><B>Can turn this bit on for other users</B></TD>\n";
print "</TR><TR>\n<TD ALIGN=CENTER><B>|</B></TD>\n";
}
print "<TD COLSPAN=2 ALIGN=LEFT><B>User is a member of these groups</B></TD>\n";
}
while (MoreSQLData()) { while (MoreSQLData()) {
my ($bit,$name,$description,$checked,$blchecked) = FetchSQLData(); my ($bit,$name,$description,$checked,$blchecked) = FetchSQLData();
print "</TR><TR>\n"; print "</TR><TR>\n";
print " <TH ALIGN=\"right\">", ucfirst($name), ":</TH>\n"; if ($editall) {
$blchecked = ($blchecked) ? "CHECKED" : "";
print "<TD ALIGN=CENTER><INPUT TYPE=CHECKBOX NAME=\"blbit_$name\" $blchecked VALUE=\"$bit\"></TD>";
}
$checked = ($checked) ? "CHECKED" : ""; $checked = ($checked) ? "CHECKED" : "";
print " <TD><INPUT TYPE=CHECKBOX NAME=\"bit_$name\" $checked VALUE=\"$bit\"> $description</TD>\n"; print "<TD ALIGN=CENTER><INPUT TYPE=CHECKBOX NAME=\"bit_$name\" $checked VALUE=\"$bit\"></TD>";
print "<TD><B>" . ucfirst($name) . "</B>: $description</TD>\n";
}
print "</TR></TABLE></TD>\n";
SendSQL("SELECT bit,name,description,bit & $groupset != 0, " .
" bit & $blessgroupset " .
"FROM groups " .
"WHERE bit & $opblessgroupset != 0 AND !isbuggroup " .
"ORDER BY name");
print "</TR><TR><TH VALIGN=TOP ALIGN=RIGHT>Privileges:</TH><TD><TABLE><TR>";
my $curgrouptype = 1;
if (MoreSQLData()) {
if ($editall) { if ($editall) {
print "</TR><TR>\n"; print "<TD COLSPAN=3 ALIGN=LEFT><B>Can turn this bit on for other users</B></TD>\n";
print "<TH></TH>"; print "</TR><TR>\n<TD ALIGN=CENTER><B>|</B></TD>\n";
$blchecked = ($blchecked) ? "CHECKED" : "";
print "<TD><INPUT TYPE=CHECKBOX NAME=\"blbit_$name\" $blchecked VALUE=\"$bit\"> Can turn this bit on for other users</TD>\n";
} }
print "<TD COLSPAN=2 ALIGN=LEFT><B>User has these priveleges</B></TD>\n";
}
while (MoreSQLData()) {
my ($bit,$name,$description,$checked,$blchecked) = FetchSQLData();
print "</TR><TR>\n";
if ($editall) {
$blchecked = ($blchecked) ? "CHECKED" : "";
print "<TD ALIGN=CENTER><INPUT TYPE=CHECKBOX NAME=\"blbit_$name\" $blchecked VALUE=\"$bit\"></TD>";
}
$checked = ($checked) ? "CHECKED" : "";
print "<TD ALIGN=CENTER><INPUT TYPE=CHECKBOX NAME=\"bit_$name\" $checked VALUE=\"$bit\"></TD>";
print "<TD><B>" . ucfirst($name) . "</B>: $description</TD>\n";
} }
print "</TR></TABLE></TD>\n";
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment