RFID: don't reload catalogue search, don't pull reader on submit

[koha.git] / Koha / SMS / Provider.pm

diff --git a/Koha/SMS/Provider.pm b/Koha/SMS/Provider.pm
index 1aa70dc..bbc9626 100644 (file)
--- a/Koha/SMS/Provider.pm
+++ b/Koha/SMS/Provider.pm
@@ -21,6 +21,8 @@ use Modern::Perl;
 
 use Carp;
 
+use Koha::Patrons;
+
 use base qw(Koha::Object);
 
 =head1 NAME
@@ -34,11 +36,25 @@ Koha::SMS::Provider - Koha SMS Provider object class
 
 =cut
 
-=head3 type
+=head3 patrons_using
+
+my $count = $provider->patrons_using()
+
+Gives the number of patrons using this provider
+
+=cut
+
+sub patrons_using {
+    my ( $self ) = @_;
+
+    return Koha::Patrons->search( { sms_provider_id => $self->id } )->count();
+}
+
+=head3 _type
 
 =cut
 
-sub type {
+sub _type {
     return 'SmsProvider';
 }