From: ivan <ivan>
Date: Fri, 30 May 2008 01:38:01 +0000 (+0000)
Subject: fix a missing semicolon bug only triggered when running prune_applications not in... 
X-Git-Tag: root_of_webpay_support~626
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=0182501c5e99b67911bee1f9393cd494f4e00f36

fix a missing semicolon bug only triggered when running prune_applications not in debug mode...
---

diff --git a/FS/FS/Misc/prune.pm b/FS/FS/Misc/prune.pm
index 371f31cbb..b6c3053b7 100644
--- a/FS/FS/Misc/prune.pm
+++ b/FS/FS/Misc/prune.pm
@@ -34,9 +34,10 @@ affected records is returned rather than actually deleting the records.
 
 sub prune_applications {
   my $options = shift;
-  my $dbh = dbh
+  my $dbh = dbh;
 
   local $DEBUG = 1 if exists($options->{debug});
+
   my $ccr = <<EOW;
     WHERE
          0 = (select count(*) from cust_credit