From e5d67ff80245eec9100e9fdacd94b95aa8157414 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sun, 27 Mar 2011 23:01:47 +0000
Subject: de-uglify DSL notes, RT#7111

---
 FS/FS/part_export/ikano.pm | 18 ------------------
 1 file changed, 18 deletions(-)

(limited to 'FS')

diff --git a/FS/FS/part_export/ikano.pm b/FS/FS/part_export/ikano.pm
index 4323d94f3..e34a3d898 100644
--- a/FS/FS/part_export/ikano.pm
+++ b/FS/FS/part_export/ikano.pm
@@ -408,24 +408,6 @@ sub quals_by_cust_and_pkg {
     @filtered_quals;
 }
 
-sub notes_html { 
-    my($self,$svc_dsl) = (shift,shift);
-    my $conf = new FS::Conf;
-    my $date_format = $conf->config('date_format') || '%m/%d/%Y';
-    my @notes = $svc_dsl->notes;
-    my $html = '<TABLE border="1" cellspacing="2" cellpadding="2" id="dsl_notes">
-	<TR><TH>Date</TH><TH>By</TH><TH>Priority</TH><TH>Note</TH></TR>';
-    foreach my $note ( @notes ) {
-	$html .= "<TR>
-	    <TD>".time2str("$date_format %H:%M",$note->date)."</TD>
-	    <TD>".$note->by."</TD>
-	    <TD>". ($note->priority eq 'N' ? 'Normal' : 'High') ."</TD>
-	    <TD>".$note->note."</TD></TR>";
-    }
-    $html .= '</TABLE>';
-    $html;
-}
-
 sub loop_type_long { # sub, not a method
     my($svc_dsl) = (shift);
     return $loopType{$svc_dsl->loop_type};
-- 
cgit v1.2.1