From 998b62d3f157ba546b2b100f2005934f42aa863f Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Tue, 4 Dec 2012 09:21:19 -0800 Subject: [PATCH] add IO::String as a proper web interface dep, RT#19732 --- FS/FS/Mason.pm | 1 + httemplate/search/customer_accounting_summary.html | 3 +-- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm index 004701646..4b1f800b6 100644 --- a/FS/FS/Mason.pm +++ b/FS/FS/Mason.pm @@ -83,6 +83,7 @@ if ( -e $addl_handler_use_file ) { use IO::Handle; use IO::File; use IO::Scalar; + use IO::String; #not actually using this yet anyway...# use IPC::Run3 0.036; use Net::Whois::Raw qw(whois); if ( $] < 5.006 ) { diff --git a/httemplate/search/customer_accounting_summary.html b/httemplate/search/customer_accounting_summary.html index 557528325..e01b8cd51 100644 --- a/httemplate/search/customer_accounting_summary.html +++ b/httemplate/search/customer_accounting_summary.html @@ -9,8 +9,7 @@ http_header('Content-Disposition' => qq!attachment;filename="$filename"!); my $output = ''; - use IO::String; - my $XLS = IO::String->new($output);; + my $XLS = IO::String->new($output); my $workbook = $format->{class}->new($XLS) or die "Error opening .xls file: $!"; -- 2.11.0