compare balance numerically to avoid spurious suspensions

diff --git a/fs_signup/fs_signup_server b/fs_signup/fs_signup_server
index 38ad558..089cfde 100755 (executable)
--- a/fs_signup/fs_signup_server
+++ b/fs_signup/fs_signup_server
@@ -196,7 +196,7 @@ while (1) {
       warn "[fs_signup_server] error collecting from new customer: $bill_error"
         if $bill_error;
 
-      if ( $cust_main->balance ) {
+      if ( $cust_main->balance > 0 ) {
         #should check list for errors...
         $cust_main->suspend;
       }