diff options
| author | ivan <ivan> | 2007-12-01 01:32:05 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2007-12-01 01:32:05 +0000 |
| commit | 0770f043ba43f47b76e65204248cfb67b044072f (patch) | |
| tree | 454bf2e564c41aec488c00a2c01bb2797734f268 /FS | |
| parent | 327fbdcae418952049c9a8cb5b93165cd03f649a (diff) | |
add h_date method too
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/Record.pm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index 0480a397f..703c06fe0 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -2131,6 +2131,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 |