From 9ffc6eb52bb9c549dae85a51aaf2b29750b7ba14 Mon Sep 17 00:00:00 2001 From: "mkanat%kerio.com" <> Date: Thu, 10 Mar 2005 16:20:41 +0000 Subject: Bug 283561: Move AppendComment out of globals.pl Patch By Max Kanat-Alexander r=vladd, a=justdave --- globals.pl | 29 ----------------------------- 1 file changed, 29 deletions(-) (limited to 'globals.pl') diff --git a/globals.pl b/globals.pl index 13542dcac..b0a8feca8 100644 --- a/globals.pl +++ b/globals.pl @@ -109,35 +109,6 @@ $::SIG{PIPE} = 'IGNORE'; #} #$::SIG{__DIE__} = \&die_with_dignity; -sub AppendComment { - my ($bugid, $who, $comment, $isprivate, $timestamp, $work_time) = @_; - $work_time ||= 0; - - if ($work_time) { - require Bugzilla::Bug; - Bugzilla::Bug::ValidateTime($work_time, "work_time"); - } - - # Use the date/time we were given if possible (allowing calling code - # to synchronize the comment's timestamp with those of other records). - $timestamp = ($timestamp ? SqlQuote($timestamp) : "NOW()"); - - $comment =~ s/\r\n/\n/g; # Get rid of windows-style line endings. - $comment =~ s/\r/\n/g; # Get rid of mac-style line endings. - - if ($comment =~ /^\s*$/) { # Nothin' but whitespace - return; - } - - my $whoid = DBNameToIdAndCheck($who); - my $privacyval = $isprivate ? 1 : 0 ; - SendSQL("INSERT INTO longdescs (bug_id, who, bug_when, thetext, isprivate, work_time) " . - "VALUES($bugid, $whoid, $timestamp, " . SqlQuote($comment) . ", " . - $privacyval . ", " . SqlQuote($work_time) . ")"); - - SendSQL("UPDATE bugs SET delta_ts = $timestamp WHERE bug_id = $bugid"); -} - sub GetFieldID { my ($f) = (@_); SendSQL("SELECT fieldid FROM fielddefs WHERE name = " . SqlQuote($f)); -- cgit v1.2.3-24-g4f1b