summaryrefslogtreecommitdiff
path: root/httemplate
diff options
context:
space:
mode:
authorivan <ivan>2010-12-17 23:44:38 +0000
committerivan <ivan>2010-12-17 23:44:38 +0000
commitc13e11794f80ddbe8748132d78bff1559782d570 (patch)
tree1fe15eaaad69dc7099f33d1bec560495941cbc5b /httemplate
parent7dc0206e7ff40bfd3e95018a7d724a63ce0af8ab (diff)
add cust_main-external_links and menu-prepend_links options for wisper NORM links, RT#10889
Diffstat (limited to 'httemplate')
-rw-r--r--httemplate/elements/menu.html16
-rwxr-xr-xhttemplate/view/cust_main.cgi18
2 files changed, 29 insertions, 5 deletions
diff --git a/httemplate/elements/menu.html b/httemplate/elements/menu.html
index acbaf41bd..69d793626 100644
--- a/httemplate/elements/menu.html
+++ b/httemplate/elements/menu.html
@@ -563,9 +563,19 @@ $help_menu{"About RT v$RT::VERSION"} = [ 'http://www.bestpractical.com/rt', 'Req
if $conf->config('ticket_system') eq 'RT_Internal';
-tie my %menu, 'Tie::IxHash',
- 'Billing Main' => [ $fsurl, 'Billing start page', ],
-;
+tie my %menu, 'Tie::IxHash';
+
+if ( $conf->config('menu-prepend_links')) {
+ my @links = split(/\n/, $conf->config('menu-prepend_links'));
+ foreach my $link (@links) {
+ $link =~ /^\s*(\S+)\s+(.*?)(\s*\(([^\)]*)\))?$/ or next;
+ my($url, $label, $alt) = ($1, $2, $4);
+ $menu{$label} = [ $url, $alt ];
+ }
+}
+
+$menu{'Billing Main'} = [ $fsurl, 'Billing start page', ];
+
if ( $conf->config('ticket_system') ) {
$menu{'Ticketing Main'} =
[
diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index df875f939..e6db0a6c1 100755
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -93,14 +93,28 @@ function areyousure(href, message) {
<BR><BR>
+% my $br = 0;
% if ( $curuser->access_right('Billing event reports')
% || $curuser->access_right('View customer billing events')
% ) {
-
+% $br=1;
<A HREF="<% $p %>search/cust_event.html?custnum=<% $custnum %>">View billing events for this customer</A>
- <BR><BR>
+% }
+% if ( $conf->config('cust_main-external_links') ) {
+ <% $br++ ? ' | ' : '' %>
+% my @links = split(/\n/, $conf->config('menu-prepend_links'));
+% foreach my $link (@links) {
+% $link =~ /^\s*(\S+)\s+(.*?)(\s*\(([^\)]*)\))?$/ or next;
+% my($url, $label, $alt) = ($1, $2, $4);
+ <A HREF="<% $url.$custnum %>" ALT="<% $alt |h %>"><% $label |h %></A>
+% }
+% }
+
+% if ( $br ) {
+ <BR><BR>
% }
+</%doc>
%my $signupurl = $conf->config('signupurl');
%if ( $signupurl ) {