From c30c90514da7746fc2ead8452390a72d5ff14d74 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sat, 1 Dec 2007 01:32:07 +0000
Subject: add h_date method too

---
 FS/FS/Record.pm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'FS')

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 7468cca07..5a23e4484 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -2074,6 +2074,19 @@ sub h_search {
 
 }
 
+=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
-- 
cgit v1.2.1