From f80515a9803e46e644a52391db8bdd73b65d5f35 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Thu, 14 Jul 2005 11:46:25 +0000
Subject: [PATCH] clean up some leftover bits from cust-fields work

---
 FS/FS/UI/Web.pm     | 3 ++-
 FS/FS/svc_Common.pm | 3 +--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/FS/FS/UI/Web.pm b/FS/FS/UI/Web.pm
index 716fd861f..031a0e67a 100644
--- a/FS/FS/UI/Web.pm
+++ b/FS/FS/UI/Web.pm
@@ -1,5 +1,6 @@
 package FS::UI::Web;
 
+use vars qw($DEBUG);
 use FS::Conf;
 use FS::Record qw(dbdef);
 
@@ -76,7 +77,7 @@ sub cust_header {
     warn "  no cust-fields configuration value found; using default 'Customer'"
       if $DEBUG;
     @cust_header = ( 'Customer' );
-    @cust_fields = ( 'cust_name' );
+    @cust_fields = ( 'name' );
   }
 
   #my $svc_x = shift;
diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm
index 205c33078..103ba631b 100644
--- a/FS/FS/svc_Common.pm
+++ b/FS/FS/svc_Common.pm
@@ -11,8 +11,7 @@ use FS::cust_main;
 
 @ISA = qw( FS::cust_main_Mixin FS::Record );
 
-#$DEBUG = 0;
-$DEBUG = 1;
+$DEBUG = 0;
 
 =head1 NAME
 
-- 
2.11.0