sprinkle some magic ajax fairy dust on referring customer SELEKTAH. rewind! make...

[freeside.git] / rt / html / Elements / Tabs

diff --git a/rt/html/Elements/Tabs b/rt/html/Elements/Tabs
index 4fc229b..721f920 100644 (file)
--- a/rt/html/Elements/Tabs
+++ b/rt/html/Elements/Tabs
@@ -1,8 +1,8 @@
-%# {{{ BEGIN BPS TAGGED BLOCK
+%# BEGIN BPS TAGGED BLOCK {{{
 %# 
 %# COPYRIGHT:
 %#  
-%# This software is Copyright (c) 1996-2004 Best Practical Solutions, LLC 
+%# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC 
 %#                                          <jesse@bestpractical.com>
 %# 
 %# (Except where explicitly superseded by other copyright notices)
@@ -42,7 +42,7 @@
 %# works based on those contributions, and sublicense and distribute
 %# those contributions and any derivatives thereof.
 %# 
-%# }}} END BPS TAGGED BLOCK
+%# END BPS TAGGED BLOCK }}}
 <& /Elements/PageLayout,
     current_toptab => $current_toptab,
     current_tab => $current_tab,
@@ -57,14 +57,22 @@
 <%INIT>
 my $action;
 my $basetopactions = {
-       A => { html => $m->scomp('/Elements/CreateTicket')      
+#      A => { html => $m->scomp('/Elements/CreateTicket')      
+#              },
+       A => { html => $m->scomp('/Elements/FreesideNewCust')   
                },
-       B => { html => $m->scomp('/Elements/SimpleSearch') 
+       B => { html => $m->scomp('/Elements/FreesideSearch')    
+               },
+       C => { html => $m->scomp('/Elements/FreesideInvoiceSearch')     
+               },
+       D => { html => $m->scomp('/Elements/FreesideSvcSearch') 
+               },
+       E => { html => $m->scomp('/Elements/SimpleSearch') 
                }
        };
 my $basetabs = {
                   ' A'=> { title => 'Billing Main',
-                           path  => '../',
+                           path  => &RT::URI::freeside::FreesideURL(),
                          },
                     A => { #title => loc('Homepage'),
                            title => 'Ticketing Main',
@@ -76,23 +84,33 @@ my $basetabs = {
                     C => { title => loc('Tools'),
                            path => 'Tools/Offline.html'
                          },
-                    E => { title => loc('Configuration'),
-                           path => 'Admin/'
-                         },
-                    K => { title => loc('Preferences'),
-                        path => 'User/Prefs.html'
-                      },
                     P => { title => loc('Approval'),
                            path => 'Approvals/'
                          },
                  };
 
+if ($session{'CurrentUser'}->HasRight( Right => 'ShowConfigTab', 
+                                      Object => $RT::System )) {
+    $basetabs->{E} = { title => loc('Configuration'),
+                       path => 'Admin/',
+                    };
+}
+
+if ($session{'CurrentUser'}->HasRight( Right => 'ModifySelf', 
+                                      Object => $RT::System )) {
+    $basetabs->{K} = { title => loc('Preferences'),
+                       path => 'User/Prefs.html'
+                    };
+}
+
 if (!defined $toptabs) {
    $toptabs = $basetabs;
 }
 if (!defined $topactions) {
    $topactions = $basetopactions;
 }
+
+  require RT::URI::freeside;
                     
   # Now let callbacks add their extra tabs
   $m->comp('/Elements/Callback',