freeside/htetc handler.pl,1.52,1.53 global.asa,1.55,1.56

[ivan]

Update of /home/cvs/cvsroot/freeside/htetc
In directory pouncequick:/tmp/cvs-serv27124/htetc

Modified Files:
	handler.pl global.asa 
Log Message:
add Excel and CSV download of templated reports and clean up their HTML formatting, closes; Bug#520, Bug#1107

Index: handler.pl
===================================================================
RCS file: /home/cvs/cvsroot/freeside/htetc/handler.pl,v
retrieving revision 1.52
retrieving revision 1.53
diff -u -d -r1.52 -r1.53
--- handler.pl	2 Mar 2005 21:00:59 -0000	1.52
+++ handler.pl	6 Mar 2005 03:04:29 -0000	1.53
@@ -97,11 +97,14 @@
       use HTML::Entities;
       use IO::Handle;
       use IO::File;
+      use IO::Scalar;
       use Net::Whois::Raw qw(whois);
       if ( $] < 5.006 ) {
         eval "use Net::Whois::Raw 0.32 qw(whois)";
         die $@ if $@;
       }
+      use Text::CSV_XS;
+      use Spreadsheet::WriteExcel;
       use Business::CreditCard;
       use String::Approx qw(amatch);
       use Chart::LinesPoints;

Index: global.asa
===================================================================
RCS file: /home/cvs/cvsroot/freeside/htetc/global.asa,v
retrieving revision 1.55
retrieving revision 1.56
diff -u -d -r1.55 -r1.56
--- global.asa	11 Feb 2005 06:44:26 -0000	1.55
+++ global.asa	6 Mar 2005 03:04:29 -0000	1.56
@@ -14,11 +14,14 @@
 use HTML::Entities;
 use IO::Handle;
 use IO::File;
+use IO::Scalar;
 use Net::Whois::Raw qw(whois);
 if ( $] < 5.006 ) {
   eval "use Net::Whois::Raw 0.32 qw(whois)";
   die $@ if $@;
 }
+use Text::CSV_XS;
+use Spreadsheet::WriteExcel;
 use Business::CreditCard;
 use String::Approx qw(amatch);
 use Chart::LinesPoints;