[freeside-commits] freeside/FS/FS Record.pm,1.135.2.6,1.135.2.7

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv8217

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	Record.pm 
Log Message:
add h_date method too

Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.135.2.6
retrieving revision 1.135.2.7
diff -u -d -r1.135.2.6 -r1.135.2.7
--- Record.pm	1 Dec 2007 01:31:21 -0000	1.135.2.6
+++ Record.pm	1 Dec 2007 01:32:07 -0000	1.135.2.7
@@ -2074,6 +2074,19 @@
 
 }
 
+=item h_date ACTION
+
+Given an ACTION, either "insert", or "delete", returns the timestamp of the
+appropriate history record corresponding to this record, if any.
+
+=cut
+
+sub h_date {
+  my($self, $action) = @_;
+  my $h = $self->h_search($action);
+  $h ? $h->history_date : '';
+}
+
 =back
 
 =head1 SUBROUTINES