fix fallout from discount work, RT#10025

diff --git a/FS/FS/cust_main/Billing.pm b/FS/FS/cust_main/Billing.pm
index 37eae8c..639d594 100644 (file)
--- a/FS/FS/cust_main/Billing.pm
+++ b/FS/FS/cust_main/Billing.pm
@@ -1617,7 +1617,7 @@ my $self = shift;
   my @where = ();
   push @where, "cust_bill_pkg.invnum = ". $cust_bill->invnum;
   push @where, "cust_bill_pkg.pkgpart_override IS NULL";
-  push @where, "part_pkg.freq = 1";
+  push @where, "part_pkg.freq = '1'";
   push @where, "(cust_pkg.cancel IS NULL OR cust_pkg.cancel = 0)";
   push @where, "(cust_pkg.susp   IS NULL OR cust_pkg.susp   = 0)";
   push @where, "0<(SELECT count(*) FROM part_pkg_discount