From 0731f30e839cb53da5d5bebe68518f136058e919 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 13 Oct 2008 22:00:50 +0000
Subject: [PATCH] Change subject for freeside-fetch emailed reports from
 "subject" to "Freeside report", and add email_report-subject config to change
 it.  RT#4093

---
 FS/FS/Conf.pm         | 7 +++++++
 FS/bin/freeside-fetch | 5 ++++-
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm
index 61b41685a..cbd038515 100644
--- a/FS/FS/Conf.pm
+++ b/FS/FS/Conf.pm
@@ -2467,6 +2467,13 @@ worry that config_items is freeside-specific and icky.
     'type'        => 'text',
   },
 
+  {
+    'key'         => 'email_report-subject',
+    'section'     => '',
+    'description' => 'Subject for reports emailed by freeside-fetch.  Defaults to "Freeside report".',
+    'type'        => 'text',
+  },
+
 );
 
 1;
diff --git a/FS/bin/freeside-fetch b/FS/bin/freeside-fetch
index 89a4f29af..3fe1a0039 100755
--- a/FS/bin/freeside-fetch
+++ b/FS/bin/freeside-fetch
@@ -40,9 +40,12 @@ foreach my $employee (@employees) {
   my $req = new HTTP::Request GET => $url;
   my $res = $ua->request($req);
 
+  my $conf = new FS::Conf;
+  my $subject = $conf->config('email_report-subject') || 'Freeside report';
+
   my %options = ( 'from'             => $email_address,
                   'to'               => $email_address,
-                  'subject'          => 'subject',
+                  'subject'          => $subject,
                   'body'             => $res->content,
                 );
 
-- 
2.11.0