X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FCGI.pm;h=9b406d34644485d64b8f536e582ef2d38aed8270;hp=1ddc62c7a55641ea3f212300234312abdce0cedb;hb=6fe8172b11d0369d0b1274d6825ec0c57afe8001;hpb=717d562bcfb691d971a01b738d0b55cdda480cf0

diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm
index 1ddc62c7a..9b406d346 100644
--- a/FS/FS/CGI.pm
+++ b/FS/FS/CGI.pm
@@ -252,10 +252,11 @@ Returns HTML tag for beginning an (invisible) table.
 sub itable {
   my $col = shift;
   my $cellspacing = shift || 0;
+  my $width = ( scalar(@_) && shift ) ? '' : 'WIDTH="100%"';  #bah
   if ( $col ) {
-    qq!<TABLE BGCOLOR="$col" BORDER=0 CELLSPACING=$cellspacing WIDTH="100%">!;
+    qq!<TABLE BGCOLOR="$col" BORDER=0 CELLSPACING=$cellspacing $width>!;
   } else {
-    qq!<TABLE BORDER=0 CELLSPACING=$cellspacing WIDTH="100%">!;
+    qq!<TABLE BORDER=0 CELLSPACING=$cellspacing $width>!;
   }
 }