[Koha-cvs] CVS: koha/C4 Auth_with_ldap.pm,1.1,1.2

[doXulting]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11463/C4

Modified Files:
        Auth_with_ldap.pm 
Log Message:
New param for the template in order to show only allowed links to user (In 
parameters screen only right now)

Index: Auth_with_ldap.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Auth_with_ldap.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** Auth_with_ldap.pm   5 Nov 2004 10:13:31 -0000       1.1
--- Auth_with_ldap.pm   23 Mar 2005 09:25:50 -0000      1.2
***************
*** 133,141 ****
  
                $borrowernumber = getborrowernumber($user);
!               my ($borr, $flags) = getpatroninformation(undef, 
$borrowernumber);
                my @bordat;
                $bordat[0] = $borr;
                $template->param(USER_INFO => address@hidden,
                );
        }
        $template->param(
--- 133,203 ----
  
                $borrowernumber = getborrowernumber($user);
!               my ($borr, $alternativeflags) = getpatroninformation(undef, 
$borrowernumber);
                my @bordat;
                $bordat[0] = $borr;
                $template->param(USER_INFO => address@hidden,
                );
+               
+               # We are going to use the $flags returned by checkauth
+               # to create the template's parameters that will indicate
+               # which menus the user can access.
+               if ($flags->{superlibrarian} == 1)
+               {
+                       $template->param(CAN_user_circulate => 1);
+                       $template->param(CAN_user_catalogue => 1);
+                       $template->param(CAN_user_parameters => 1);
+                       $template->param(CAN_user_borrowers => 1);
+                       $template->param(CAN_user_permission => 1);
+                       $template->param(CAN_user_reserveforothers => 1);
+                       $template->param(CAN_user_borrow => 1);
+                       $template->param(CAN_user_reserveforself => 1);
+                       $template->param(CAN_user_editcatalogue => 1);
+                       $template->param(CAN_user_updatecharge => 1);
+                       $template->param(CAN_user_acquisition => 1);
+                       $template->param(CAN_user_management => 1);
+                       $template->param(CAN_user_tools => 1); }
+               
+               if ($flags->{circulate} == 1) {
+                       $template->param(CAN_user_circulate => 1); }
+ 
+               if ($flags->{catalogue} == 1) {
+                       $template->param(CAN_user_catalogue => 1); }
+               

+               if ($flags->{parameters} == 1) {
+                       $template->param(CAN_user_parameters => 1);     
+                       $template->param(CAN_user_management => 1);
+                       $template->param(CAN_user_tools => 1); }
+               

+               if ($flags->{borrowers} == 1) {
+                       $template->param(CAN_user_borrowers => 1); }
+               

+               if ($flags->{permissions} == 1) {
+                       $template->param(CAN_user_permission => 1); }
+               
+               if ($flags->{reserveforothers} == 1) {
+                       $template->param(CAN_user_reserveforothers => 1); }
+               

+               if ($flags->{borrow} == 1) {
+                       $template->param(CAN_user_borrow => 1); }
+               

+               if ($flags->{reserveforself} == 1) {
+                       $template->param(CAN_user_reserveforself => 1); }
+               

+               if ($flags->{editcatalogue} == 1) {
+                       $template->param(CAN_user_editcatalogue => 1); }
+               

+               if ($flags->{updatecharges} == 1) {
+                       $template->param(CAN_user_updatecharge => 1); }
+               
+               if ($flags->{acquisition} == 1) {
+                       $template->param(CAN_user_acquisition => 1); }
+               
+               if ($flags->{management} == 1) {
+                       $template->param(CAN_user_management => 1);
+                       $template->param(CAN_user_tools => 1); }
+               
+               if ($flags->{tools} == 1) {
+                       $template->param(CAN_user_tools => 1); }
+               
        }
        $template->param(