X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Frate.pm;h=c50ca044a191f278a9c2a6d69a7e89622d7234c6;hb=f13afe5e228a220311557e1ca6dacbf847c26baf;hp=1cc215244f460fc48300c63f687ff2ae8409ea08;hpb=76a0c0009d9780cedd74e481ae6530010d210b3f;p=freeside.git

diff --git a/FS/FS/rate.pm b/FS/FS/rate.pm
index 1cc215244..c50ca044a 100644
--- a/FS/FS/rate.pm
+++ b/FS/FS/rate.pm
@@ -2,14 +2,12 @@ package FS::rate;
 
 use strict;
 use vars qw( @ISA $DEBUG );
-use Storable qw(thaw);
-use Data::Dumper;
 use FS::Record qw( qsearch qsearchs dbh fields );
 use FS::rate_detail;
 
 @ISA = qw(FS::Record);
 
-$DEBUG = 1;
+$DEBUG = 0;
 
 =head1 NAME
 
@@ -309,6 +307,8 @@ Experimental job-queue processor for web interface adds/edits
 
 =cut
 
+use Storable qw(thaw);
+use Data::Dumper;
 use MIME::Base64;
 sub process {
   my $job = shift;
@@ -363,7 +363,7 @@ sub process {
     #$ratenum = $rate->getfield('ratenum');
   }
 
-  die $error if $error;
+  die "$error\n" if $error;
 
 }