add cust_main-title-display_custnum, RT#9621

diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm
index 8f6a70c..c436413 100644 (file)
--- a/FS/FS/Conf.pm
+++ b/FS/FS/Conf.pm
@@ -3257,6 +3257,13 @@ and customer address. Include units.',
     'type'        => 'checkbox',
   },
 
+  {
+    'key'         => 'cust_main-title-display_custnum',
+    'section'     => 'UI',
+    'description' => 'Add the display_custom (agent_custid or custnum) to the title on customer view pages.',
+    'type'        => 'checkbox',
+  },
+
   {
     'key'         => 'cust_bill-default_agent_invid',
     'section'     => 'UI',

diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index 0b6148d..cb325e2 100755 (executable)
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -1,5 +1,5 @@
 <% include('/elements/header.html', {
-             'title' => "Customer: ". $cust_main->name,
+             'title' => $title,
              'nobr'  => 1,
           })
 %>
@@ -265,6 +265,11 @@ my $cust_main = qsearchs( {
 });
 die "Customer not found!" unless $cust_main;
 
+my $title = $cust_main->name;
+$title = '('. $cust_main->display_custnum. ") $title"
+  if $conf->exists('cust_main-title-display_custnum');
+$title = "Customer: $title";
+
 #false laziness w/pref/pref.html and Conf.pm (cust_main-default_view)
 tie my %views, 'Tie::IxHash',
        'Basics'           => 'basics',