service def classes, to support corecom portal, RT#17617

diff --git a/FS/FS/part_svc.pm b/FS/FS/part_svc.pm
index 20b80c6..dd18e87 100644 (file)
--- a/FS/FS/part_svc.pm
+++ b/FS/FS/part_svc.pm
@@ -716,7 +716,7 @@ sub process {
   my $job = shift;
 
   my $param = thaw(decode_base64(shift));
-  warn Dumper($param);# if $DEBUG;
+  warn Dumper($param) if $DEBUG;
 
   my $old = qsearchs('part_svc', { 'svcpart' => $param->{'svcpart'} }) 
     if $param->{'svcpart'};