[freeside-commits] freeside/FS/FS/part_export everyone_net.pm, 1.2, 1.3

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory wavetail:/tmp/cvs-serv12590

Modified Files:
	everyone_net.pm 
Log Message:
add debugging option to everyone_net export

Index: everyone_net.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/everyone_net.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- everyone_net.pm	4 Oct 2005 20:27:41 -0000	1.2
+++ everyone_net.pm	6 Oct 2005 20:35:14 -0000	1.3
@@ -10,6 +10,8 @@
   'clientID'  => { label=>'clientID' },
   'password'  => { label=>'Password' },
   #'workgroup' => { label=>'Default Workgroup' },
+  'debug'     => { label=>'Enable debugging',
+                    type=>'checkbox'          },
 ;
 
 %info = (
@@ -51,6 +53,9 @@
   eval "use Net::XRC qw(:types);";
   return $@ if $@;
 
+  local($Net::XRC::DEBUG) = 1
+    if $self->option('debug');
+
   my $xrc = new Net::XRC (
     'clientID' => $self->option('clientID'),
     'password' => $self->option('password'),