[freeside-commits] freeside/FS/FS/UI/Web small_custview.pm, 1.2, 1.3

Ivan,,, ivan at wavetail.420.am
Mon Jun 2 11:31:11 PDT 2008


Update of /home/cvs/cvsroot/freeside/FS/FS/UI/Web
In directory wavetail.420.am:/tmp/cvs-serv2833

Modified Files:
	small_custview.pm 
Log Message:
fix ntable calls

Index: small_custview.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/UI/Web/small_custview.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- small_custview.pm	2 Jun 2008 17:14:30 -0000	1.2
+++ small_custview.pm	2 Jun 2008 18:31:07 -0000	1.3
@@ -112,5 +112,18 @@
   $html;
 }
 
+#bah.  don't want to pull in all of FS::CGI, that's the whole problem in the
+#first place
+sub ntable {
+  my $col = shift;
+  my $cellspacing = shift || 0;
+  if ( $col ) {
+    qq!<TABLE BGCOLOR="$col" BORDER=0 CELLSPACING=$cellspacing>!;
+  } else {
+    '<TABLE BORDER CELLSPACING=0 CELLPADDING=2 BORDERCOLOR="#999999">';
+  }
+
+}
+
 1;
 



More information about the freeside-commits mailing list