[freeside-commits] freeside/FS/FS/part_export prizm.pm, 1.3.2.7, 1.3.2.8

[Jeff Finucane,420,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory wavetail.420.am:/tmp/cvs-serv2663/FS/FS/part_export

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	prizm.pm 
Log Message:
allow exports to add links to customer view (#1407)

Index: prizm.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/prizm.pm,v
retrieving revision 1.3.2.7
retrieving revision 1.3.2.8
diff -u -d -r1.3.2.7 -r1.3.2.8
--- prizm.pm	25 Jan 2008 02:55:21 -0000	1.3.2.7
+++ prizm.pm	12 Mar 2008 16:22:11 -0000	1.3.2.8
@@ -463,6 +463,14 @@
   '';
 }
 
+sub export_links {
+  my( $self, $svc, $arrayref ) = ( shift, shift, shift );
+
+  push @$arrayref, '<A HREF="http://'. $svc->ip_addr. '">SM</A>';
+
+  '';
+}
+
 sub queue_statuschange {
   my( $self, $method, $jobs, $svc, @args ) = @_;