summaryrefslogtreecommitdiffstats
path: root/post_bug.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'post_bug.cgi')
-rwxr-xr-xpost_bug.cgi20
1 files changed, 20 insertions, 0 deletions
diff --git a/post_bug.cgi b/post_bug.cgi
index c3be5c67b..18b579119 100755
--- a/post_bug.cgi
+++ b/post_bug.cgi
@@ -120,12 +120,32 @@ if (Param("useqacontact")) {
+if (exists $::FORM{'bug_status'}) {
+ if (!UserInGroup("canedit") && !UserInGroup("canconfirm")) {
+ delete $::FORM{'bug_status'};
+ }
+}
+
+if (!exists $::FORM{'bug_status'}) {
+ $::FORM{'bug_status'} = $::unconfirmedstate;
+ SendSQL("SELECT votestoconfirm FROM products WHERE product = " .
+ SqlQuote($::FORM{'product'}));
+ if (!FetchOneColumn()) {
+ $::FORM{'bug_status'} = "NEW";
+ }
+}
+
+
my @used_fields;
foreach my $f (@bug_fields) {
if (exists $::FORM{$f}) {
push (@used_fields, $f);
}
}
+if (exists $::FORM{'bug_status'} && $::FORM{'bug_status'} ne $::unconfirmedstate) {
+ push(@used_fields, "everconfirmed");
+ $::FORM{'everconfirmed'} = 1;
+}
my $query = "insert into bugs (\n" . join(",\n", @used_fields) . ",
creation_ts )