From a1a0917d78fae421256ca04470926803cec6316c Mon Sep 17 00:00:00 2001
From: Dave Lawrence <dlawrence@mozilla.com>
Date: Wed, 11 Jan 2012 14:16:57 -0500
Subject: Bug 714370 - Add accessors to the Flag.pm object for
 modification_date and creation_date r=glob

---
 Bugzilla/Flag.pm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/Bugzilla/Flag.pm b/Bugzilla/Flag.pm
index 76d950994..7db80c458 100644
--- a/Bugzilla/Flag.pm
+++ b/Bugzilla/Flag.pm
@@ -84,6 +84,8 @@ use constant DB_COLUMNS => qw(
     type_id
     bug_id
     attach_id
+    creation_date
+    modification_date
     requestee_id
     setter_id
     status
@@ -132,6 +134,14 @@ Returns the ID of the attachment this flag belongs to, if any.
 
 Returns the status '+', '-', '?' of the flag.
 
+=item C<creation_date>
+
+Returns the timestamp when the flag was created.
+
+=item C<modification_date>
+
+Returns the timestamp when the flag was last modified.
+
 =back
 
 =cut
@@ -144,6 +154,8 @@ sub attach_id    { return $_[0]->{'attach_id'};    }
 sub status       { return $_[0]->{'status'};       }
 sub setter_id    { return $_[0]->{'setter_id'};    }
 sub requestee_id { return $_[0]->{'requestee_id'}; }
+sub creation_date     { return $_[0]->{'creation_date'};     }
+sub modification_date { return $_[0]->{'modification_date'}; }
 
 ###############################
 ####       Methods         ####
@@ -450,6 +462,7 @@ sub update {
     if (scalar(keys %$changes)) {
         $dbh->do('UPDATE flags SET modification_date = ? WHERE id = ?',
                  undef, ($timestamp, $self->id));
+        $self->{'modification_date'} = $timestamp;
     }
     return $changes;
 }
-- 
cgit v1.2.3-24-g4f1b