diff options
Diffstat (limited to 'perllib/FixMyStreet/DB/ResultSet/Contact.pm')
| -rw-r--r-- | perllib/FixMyStreet/DB/ResultSet/Contact.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/DB/ResultSet/Contact.pm b/perllib/FixMyStreet/DB/ResultSet/Contact.pm index eb502c190..f8f182e05 100644 --- a/perllib/FixMyStreet/DB/ResultSet/Contact.pm +++ b/perllib/FixMyStreet/DB/ResultSet/Contact.pm @@ -20,6 +20,11 @@ sub not_deleted { return $rs->search( { $rs->me('state') => { -not_in => [ 'deleted', 'staff' ] } } ); } +sub not_deleted_admin { + my $rs = shift; + return $rs->search( { $rs->me('state') => { -not_in => [ 'deleted' ] } } ); +} + sub active { my $rs = shift; $rs->search( { $rs->me('state') => [ 'unconfirmed', 'confirmed' ] } ); |