add skip_dst_prefix option, RT#3288

[freeside.git] / FS / FS / msg_template.pm

diff --git a/FS/FS/msg_template.pm b/FS/FS/msg_template.pm
index 83acde2..97cf50f 100644 (file)
--- a/FS/FS/msg_template.pm
+++ b/FS/FS/msg_template.pm
@@ -166,15 +166,11 @@ sub send {
 
   my $subs = $self->substitutions;
   
-  use Data::Dumper;
-  warn Dumper($subs);
-
   #XXX html escape this stuff
   my %hash = map { $_ => $cust_main->$_() } @{ $subs->{'cust_main'} };
   unless ( ! $object || $object->table eq 'cust_main' ) {
     %hash = ( %hash, map { $_ => $object->$_() } @{ $subs->{$object->table} } );
   }
-  warn Dumper(\%hash);
 
   my $subject_tmpl = new Text::Template (
     TYPE   => 'STRING',