bug_file_loc => {TYPE => 'TEXT'},
bug_severity => {TYPE => 'varchar(64)', NOTNULL => 1},
bug_status => {TYPE => 'varchar(64)', NOTNULL => 1},
- creation_ts => {TYPE => 'DATETIME', NOTNULL => 1},
+ creation_ts => {TYPE => 'DATETIME'},
delta_ts => {TYPE => 'DATETIME', NOTNULL => 1},
short_desc => {TYPE => 'MEDIUMTEXT', NOTNULL => 1},
op_sys => {TYPE => 'varchar(64)', NOTNULL => 1},
}
$query .= " WHERE " . join(' AND ', (@wherepart, @andlist)) .
- " AND ((bug_group_map.group_id IS NULL)";
+ " AND bugs.creation_ts IS NOT NULL AND ((bug_group_map.group_id IS NULL)";
if ($user->id) {
my $userid = $user->id;
# is cached because this may be called for every row in buglists or
# every bug in a dependency list.
unless ($sth) {
- $sth = $dbh->prepare("SELECT reporter, assigned_to, qa_contact,
+ $sth = $dbh->prepare("SELECT 1, reporter, assigned_to, qa_contact,
reporter_accessible, cclist_accessible,
COUNT(cc.who), COUNT(bug_group_map.bug_id)
FROM bugs
ON bugs.bug_id = bug_group_map.bug_id
AND bug_group_map.group_ID NOT IN(" .
join(',',(-1, values(%{$self->groups}))) .
- ") WHERE bugs.bug_id = ? " .
+ ") WHERE bugs.bug_id = ?
+ AND creation_ts IS NOT NULL " .
$dbh->sql_group_by('bugs.bug_id', 'reporter, ' .
'assigned_to, qa_contact, reporter_accessible, ' .
'cclist_accessible'));
}
$sth->execute($bugid);
- my ($reporter, $owner, $qacontact, $reporter_access, $cclist_access,
+ my ($ready, $reporter, $owner, $qacontact, $reporter_access, $cclist_access,
$isoncclist, $missinggroup) = $sth->fetchrow_array();
$sth->finish;
$self->{sthCanSeeBug} = $sth;
- return ( (($reporter == $userid) && $reporter_access)
- || (Param('useqacontact') && $qacontact &&
- ($qacontact == $userid))
- || ($owner == $userid)
- || ($isoncclist && $cclist_access)
- || (!$missinggroup) );
+ return ($ready
+ && ((($reporter == $userid) && $reporter_access)
+ || (Param('useqacontact') && $qacontact && ($qacontact == $userid))
+ || ($owner == $userid)
+ || ($isoncclist && $cclist_access)
+ || (!$missinggroup)));
}
sub get_selectable_products {
{TYPE => 'INT2', NOTNULL => 1, DEFAULT => 0});
}
+# 2005-06-14 - LpSolit@gmail.com - Bug 292544: only set creation_ts
+# when all bug fields have been correctly set.
+$dbh->bz_alter_column('bugs', 'creation_ts', {TYPE => 'DATETIME'});
# If you had to change the --TABLE-- definition in any way, then add your
# differential change code *** A B O V E *** this comment.
my $sql_timestamp = SqlQuote($timestamp);
# Build up SQL string to add bug.
+# creation_ts will only be set when all other fields are defined.
my $sql = "INSERT INTO bugs " .
- "(" . join(",", @used_fields) . ", reporter, creation_ts, delta_ts, " .
+ "(" . join(",", @used_fields) . ", reporter, delta_ts, " .
"estimated_time, remaining_time, deadline) " .
"VALUES (";
# OK except for the fact that it causes e-mail to be suppressed.
$comment = $comment ? $comment : " ";
-$sql .= "$::userid, $sql_timestamp, $sql_timestamp, ";
+$sql .= "$::userid, $sql_timestamp, ";
# Time Tracking
if (UserInGroup(Param("timetrackinggroup")) &&
}
# Add the bug report to the DB.
+$dbh->bz_lock_tables('bugs WRITE', 'bug_group_map WRITE', 'longdescs WRITE',
+ 'cc WRITE', 'keywords WRITE', 'dependencies WRITE',
+ 'bugs_activity WRITE', 'groups READ', 'user_group_map READ',
+ 'keyworddefs READ', 'fielddefs READ');
+
SendSQL($sql);
# Get the bug ID back.
}
}
+# All fields related to the newly created bug are set.
+# The bug can now be made accessible.
+$dbh->do("UPDATE bugs SET creation_ts = ? WHERE bug_id = ?",
+ undef, ($timestamp, $id));
+
+$dbh->bz_unlock_tables();
+
# Email everyone the details of the new bug
$vars->{'mailrecipients'} = {'changer' => Bugzilla->user->login};