From 942d6c9ed24ac236abd050773cc38a9a6694357f Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Wed, 10 Apr 2013 13:01:39 -0700
Subject: [PATCH] snarfs are used by commuigate pro RPOP

---
 FS/FS/svc_acct.pm | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index 6b4838401..26d6e5b72 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -1895,22 +1895,22 @@ sub email {
   $self->username. '@'. $self->domain(@_);
 }
 
-# snarfs are unused at this point?
-#
-# =item acct_snarf
-# 
-# Returns an array of FS::acct_snarf records associated with the account.
-# 
-# =cut
-# 
-# sub acct_snarf {
-#   my $self = shift;
-#   qsearch({
-#     'table'    => 'acct_snarf',
-#     'hashref'  => { 'svcnum' => $self->svcnum },
-#     #'order_by' => 'ORDER BY priority ASC',
-#   });
-# }
+
+=item acct_snarf
+
+Returns an array of FS::acct_snarf records associated with the account.
+
+=cut
+
+# unused as originally intended, but now by Communigate Pro "RPOP"
+sub acct_snarf {
+  my $self = shift;
+  qsearch({
+    'table'    => 'acct_snarf',
+    'hashref'  => { 'svcnum' => $self->svcnum },
+    #'order_by' => 'ORDER BY priority ASC',
+  });
+}
 
 =item cgp_rpop_hashref
 
-- 
2.11.0